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ABC del BASIC 


Nel numero del mese scorso abbiamo 
intrapreso un programma (per la verità 
non molto ben strutturato) per calcolare i 
riflessi tramite il timer jiffy clock Com¬ 
modore. 

Con questa rubrica porteremo a termine il 
nostro esame di TI e TIS e conosceremo 
un timer più preciso di quello già studiato. 
Come ricorderete, il nostro programma 
stampa una serie di barre orizzontali sullo 
schermo. 

L’utente, mentre ciascuna di esse si affac¬ 
cia sul video, deve premere più veloce¬ 
mente possibile il tasto di spaziatura per 
controllare il proprio tempo di risposta 
dalla comparsa della linea colorata. Ab¬ 
biamo già dato le linee 10-180 del pro¬ 
gramma, nelle quali viene stampata la 
prima barra e si calcola la reazione dell’u- 
tente leggendo la variabile TI precipua del 
timer. Il contatore di barra D veniva incre¬ 
mentato, pur restando minore del numero 
di barre richieste dall’utente all’inizio del 
programma (NB). Ora rendiamo più inte¬ 
ressante il display, alternando barre di 
colore ciano e rosso. 

190 IF FL=0 THEN FL=1: 

PRINT"{RED}GOTO 120 
200 FL=0:PRINT "{CYN)}; 

Con queste due linee dimostriamo l’uso di 
un flag -FL nel caso specifico- per alterna¬ 
re due colori. Adesso abbiamo bisogno di 
un altro ritardo casuale tra la stampa di 
una linea e l’altra per impedire all’utente, 
come stabilito nella rubrica di gennaio, di 
premere anticipatamente il tasto, che 
migliorerebbe così (solo apparentemen¬ 
te) la propria prestazione. 

210 FOR U=1 TO INT(200* 

RND ( 1.) ) +20 : GET B$:IF 
B$<>"{SPACE)"THEN 
NEXT: GOTO 110 

Terminato il ritardo casuale mandiamo 
indietro il controllo per stampare una 
nuova barra, ed azzeriamo il clock. Quan¬ 
do l’utente cerca di anticipare la barra, 
rispondiamo con un messaggio evidente. 
220 IF B$="{SPACE}" THEN 
PRINT "(WHT)(DOWN) 
TROPPO PRESTO!" 


I timer, seconda parte. 

Larry Cottoti 


Con la linea successiva azzeriamo D 
(numero di barre stampate), TL (tempo di 
reazione totale), ed FL (flag del colore) e 
spediamo l’utente a livello zero, tale è la 
punizione per aver premuto il tasto di 
spazio troppo presto (linea 220) o troppo 
tardi (linea 130, nella porzione del pro¬ 
gramma vista il mese scorso). 

230 D=0:TL=0:FL=1: GOTO 80 

Le cinque linee finali del programma 
vengono chiamate dalla 180, il cui compi¬ 
to è di controllare quando il numero di 
barre stampate (D) collima con la richie¬ 
sta dell’utente (NB). 

240 AV=TL/D:AV=INT(AV* 

100+.5)/100 

250 PRINT "{WHT}{DOWN} 

TEMPO DI REAZIONE MEDIO 
="AV"SEC." 

260 IF AV<BT THEN PRINT 

"{DOWN(MIGLIOR TEMPO = 
"AV"SEC. " :BT=AV: 

GOTO 230 

270 PRINT"{DOWN}MIGLIOR 
TEMPO ="BT"SEC." 

280 GOTO 230 

La variabile AV è il tempo di reazione 
medio (average) per la serie di barre, arro¬ 
tondato a due posti decimali. Nella linea 
260 lo raffrontiamo a BT (ipoteticamente 
definito come 100 nella linea 10), per 
registrare il miglior tempo dell’utente. Se 
AV è minore di BT, il nuovo BT diventa 
uguale a AV. Altrimenti BT non cambia e 
viene stampato dalla linea 270. 

Provate ad eseguire il programma diverse 
volte fino a registrare il vostro miglior 
tempo. Poi confrontatelo con i riflessi di 
un amico. I miei tempi si aggirano intorno 
a 0.22 secondi; i più giovani fanno di 


meglio, invariabilmente. 

Musica e TI 

Visto che il Commodore 64 è molto dota¬ 
to muscialmente, e dato che contiene un 
timer jiffy clock di facile uso, cerchiamo 
di sfruttare TI per calcolare la durata delle 
note. Inseriamo il breve programma che 
segue: suona una scala musicale. Anziché 
attraverso indicazioni per ogni linea, po¬ 
trete sapere tutto ciò che occorre tramite le 
istruzioni REM. 

10 M=256:D=10: REM 

MOLTIPLICATORE E DURATA 
20 J=54272:FOR K=J TO J+ 

23 :POKE K,0:NEXT:REM 
PULISCE CHIP SUONO 
30 POKE J+24,15:REM VOLUME 
AL MASSIMO 

40 POKE J+3,8 : REM SQUARE 
WAVE PER VOCE 1 
50 POKE J+5,15:POKE J+6, 
12:REM ENVELOPE VOCE 1 
60 READ X 

70 X1=INT(X/M):X2=X-X1* 

M : REM CALCOLO VALORI DI 
FREQUENZA POKEABILI 
80 POKE J+l,XI :POKE J,X2: 
REM VALORI DI FREQUENZA 
PER VOCE 1 

90 POKE J+4,65 : REM ACCENDE 

NOTA 

100 T=TI+D: REM LEGGE TI, 
SOMMA DURATA 

110 IF TIOT THEN 110:REM 
LOOP FINO A CHE TI = 
SOMMA VALORE TI 
PRECEDENTE + DURATA 
120 POKE J+4,64 :IF X=0 THEN 
END:REM SPEGNE NOTA 
130 GOTO 60:REM RITORNA PER 
UN'ALTRA NOTA 
1000 DATA 4291,4817,5407, 57 
28,6430,7217,8101, 

8583,9:REM DA PROG. 

REF. GUIDE 

Abbiamo già visto molti dei procedimenti 
qui utilizzati quando ci siamo soffermati 
sulla musica per 64, fatta eccezione per 
l’uso di TI nelle linee 100-110. Ecco 
qualche chiarimento. Accendiamo la nota 
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alla linea 90. In 100 e 110 leggiamo due 
valori di TI. La durata D (definita in 10) 
verrà aggiunta al primo valore. Poi. nella 
linea 110, il secondo valore di TI viene 
comparato a T; se non si equivalgono, il 
programma si ferma in un loop alla linea 
110 per leggere ancora TI fino a che non 
equivale a T. Quando ciò si verifica, il 
programma salta alla linea 120, che spe- 
gne la nota. Provate a sostituire il valore di 
D alla linea 10 con altri valori da 1 a 500 
ed osservate il risultato. 


Un clock semplice ma preciso 
Ecco un programmino che util i zza il clock 
TOD per stampare su schermo l’orario, 
esatto ad un decimo di secondo, mentre un 
ticchettio scandisce i secondi che passa¬ 
no. Il funzionamento del clock non per¬ 
mette di operare sulla macchina, diversa- 
mente da altri timer in linguaggio macchi¬ 
na. Nondimeno è educativo. Anche in 
questo caso abbiamo preferito le note in 
REM ad una spiegazione linea-per-linea. 


Il timer esatto 

Nel numero di gennaio abbiamo parlato 
dei timer installati sul Commodore 64: 
uno esatto e l’altro un po’ meno. Avendo 
già visto il funzionamento del secondo, 
passiamo ad esaminare il primo: il TOD 
(Time of Day) clock. In realtà nella mac¬ 
china vi sono due clock TOD ed, ironia 
della sorte, scandiscono il tempo in deci¬ 
mi di secondo anziché in sessantesimi 
come il jiffy clock. 

Per quale motivo i clock TOD sono più 
esatti del clock jiffy? Da una parte, que¬ 
st’ultimo viene interrotto da caricamenti e 
salvataggi su cassetta ed inoltre può persi¬ 
no differire da computer a computer (il 
mio jiffy perde circa due secondi al gior¬ 
no). I clock TOD all’opposto, sono accu¬ 
rati quanto la frequenza di 60 Hz della 
corrente cui è collegata la macchina. 

Pur non avendo bisogno di TI e TI$ per 
operare, questi timer sono ugualmente 
programmabili per mezzo delle istruzioni 
BASIC imparate sin’ora. Accederemo al 
TOD che utilizza i registri di memoria 
56328-56331 (l’altro si serve dei registri 
56584-56587 e vi si accede analogamen¬ 
te). I valori destinati alla regolazione del 
clock devono essere assegnati con POKE 
ai quattro registri seguenti. 


10 

20 


30 


40 

50 

60 

99 


100 

110 

120 


FUNZIONE 

Ore/a.m./p.m. 

Minuti 

Secondi 

Decimi di secondo 


REGISTRO 

130 

56331 

56330 

56329 140 

56328 150 

160 


Poi, per leggere il clock, andiamo a scru¬ 
tare (PEEK) questi stessi registri per 169 
stamparne il contenuto. 


FOR J=54272 TO 54295: 
POKE J,0:NEXT: REM 
PULISCE CHIP SOUND 
POKE 54275,8:POKE 54 
296,15:REM SQUARE WAVE 
E VOLUME MASSIMO, NO 
ADSR PER IL TIC 
POKE 54273,100:REM 
REGOLA PITCH DEL TIC, 
PROVATE ALTRE 
REGOLAZIONI 
INPUT "(CLR){WHT) 

{DOWN}ORE};T(1):IF 
T ( 1)>12 THEN 4 0 
INPUT "(DOWN)MINUTI" 

;T (2):IF T(2)>59 THEN 
PRINT "{3 UP}": GOTO 50 
INPUT "(DOWN)SECONDI) 

;T(3):IF T(3)>59 THEN 
PRINT "{3 UP}": GOTO 60 
LINEA 100 CALCOLA 
VALORI POKEABILI PER 
TRE REGISTRI 
TIME-OF-DAY 

FOR 1=1 TO 3 :H=INT(T ( I) 
/IO):L=T(I)10*H:T (I) 
=16*H+L:NEXT 
C=56331:REM PRIMO DEI 
QUATTRO REGISTRI TOD 
POKE C,T(1):POKE C-1,T 
(2) :POKE C-2,T(3): REM 
RIEMPE PRIMI TRE 
REGISTRI TOD 
PRINT "(DOWN)PREMI UN 
TASTO PER AZIONARE 
L'OROLOGIO." 

GET A$ : IF A$="" THEN 140 
PRINT "(CLR)" 

POKE C-3,0:REM AZIONA 
CLOCK 

REM ALLE LINEE 170-240 
LOOP CHE LEGGE 


RIPETUTAMENTE I QUATTRO 
REGISTRI 

170 H=PEEK(C):M=PEEK(C-1): 
S=PEEK(C-2):T=PEEK(C- 
3) : REM LETTURA REGISTRI 
180 C1$=CHR((16 AND H)/16+ 
48)+CHR$((15 AND H)+48) 

: REM GENERA STRINGA ORE 
190 C2$=CHR$((240 AND M)/ 
16+48)+CHRS((15 AND M) 

+ 48): REM GENERA STRINGA 
MINUTI 

200 C3$=CHR$((240 AND S)/ 
16+48)+CHR$((15 AND S) 
+48:REM GENERA STRINGA 
SECONDI 

210 IF C3$=C4$ THEN 230:REM 
SE DIVERSO, STAMPA ORA E 
SALTA SUBROUTINE SUONO 
220 GOSUB 300:C4$=C3$:REM 
C3$OC4$, QUINDI SUONO 
TIC, E DI NUOVO C3$=C4$ 
230 PRINT "ORA ESATTA "Cl$ 
+">"+C2$+":"+C3$+">"T" 

(UP}): REM STAMPA 
ORARIO, CURSORE 
IN ALTO 
240 GOTO 170 
300 POKE 54276,65:POKE 
54276, 64 : RETURN : REM 
ACCENDE E SPEGNE 
VELOCEMENTE IL SUONO 

Inserite il programma e salvatelo su disco 
o cassetta. Dopo il lancio, viene chiesto 
all’utente di inserire tre valori per regolare 
l’orologio. I valori possibili rientrano 
nell’intervallo 0-12 per le ore e 0-59 per 
minuti e secondi. Una volta premuto un 
tasto per avviare l’orologio, il programma 
converte i numeri digitati per renderli 
comprensibili al TOD. 

Questo non è un orologio di 24 ore, e non 
distingue ora pomeridiana ed antimeri¬ 
diana; non è neppure necessario inserire 
numeri di due cifre. Per esempio, se sono 
le 1:06 pomeridiane, alla richiesta di input 
risponderemo con 1, 6 e RETURN. Con 
un tasto qualsiasi si aziona l’orologio. 
Sincronizzatelo con un orologio elettrico 
della cui precisione siete certi e non note¬ 
rete una benché minima variazione rispet¬ 
to all’ora esatta. 

© Compule Publications. Tulli i diritti sono risenati. 
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Conosci l'informatica 
e il tuo C64/128? 


1 . Per modificare il colore del primo piano 
senza variare quello di fondo è necessario 
usare la seguente istruzione: 

a) POKE 792,244: POKE 793,207 

h) POKE l,PEEK(l)OR4 

t ) POKE 56334, PEEK (56334 

OR 1) 

d) POKE SM, (PEEK(SM) AND 
240) OR CO 

e) POKESM,(PEEK(SM) AND 15) 
OR 16*C1 


2. L'equivalente decimale di 10101100 è: 

a) 251 

b) 172 

c) 201 

d) 124 

e) 183 


3. SC è la locazione (653) usata dal Com¬ 
modore per conservare i codici dei tasti 
SHIFT e COMMODORE. Premendo il 
tasto COMMODORE il valore contenuto 
in tale locazione è: 

a) 2 

b) 0 

c) 1 

d) 8 

e) 255 


4. La locazione 53266 è il registro di raster 

e contiene: 

a) il punto dello schermo interessato 
in quell'istante dalla scansione 

b) le coordinate del punto di 
collisione tra due sprite 

c) le coordinate del punto di 
collisione di uno sprite con 
lo sfondo 

d) il primo punto dello schermo in 
alto a sinistra 

e) le coordinate del punto sullo 
schermo in corrispondenza 

del quale si trova la penna ottica 
in quell'istante 


5. 11 bus dati di un microprocessore ha 

particolari caratteristiche, quale delle 

seguenti rientra nelle norme? 

a) ha un flusso dati unidirezionale e 
può assumere tre stati 

b) può avere un flusso dati sia 
unidirezionale che bidirezionale 

c) ha un flusso dati bidirezionale e 
può assumere tre stati 

d) ha un flusso dati bidirezionale e 
può assumere solo due stati (0 e 1 ) 

e) non ha niente a che vedere con 
nessuno dei quattro punti 
sopra citati 


6. Nell’istante in cui la linea READ si 

attiva ( va a livello logico basso): 

a) un dispositivo di memoria o di I/O 
sta per leggere un dato 

b) un dispositivo di memoria o di I/O 
hanno appena completato la 
lettura di un dato 

c) il microprocessore ha appena 
completato la lettura di un dato 

d) il microprocessore sta per leggere 
un dato 

e) il dato letto viene memorizzato 
nella prima locazione libera del 
banco di RAM 


7. Il dispositivo selezionato dal circuito di 
figura, è posto all'indirizzo: 

a) A034 

b) 5FCC 

c) 430A 

d) A03C 

e) 3FFF 


8, 1 valori di tono generati dal chip SID del 
C64 sono formati da: 

a) un byte 

b) due byte 

c) quattro byte 

d) otto byte 

e) sedici byte 


A15-^p - o 

A14 - c 

SELEZIONE | 
DISPOSITIVO J, 

Alo 1 

A12—— - 0 


4 

74LS138 

enable 

sei 

ABC 

All - o 

AIO - o 

_ 0 

A9 - o 

A8 - o 

A7 - o 

A6 “iC - 0 

a*; « 

READ ° 

A5 -c 

A4 - 

A3 - ——o 

jir 

AO Al A2 


9. Il circuito di figura, genera un segnale 
di selezione del chip (chip select) diretto: 

a) al microprocessore 

b) alla ROM 

c) alla RAM 

d) alla porta d'uscita 

e) alla porta d'ingresso 


10. L'istruzione FRE va seguita da una 

variabile di qualunque tipo, ed ottiene il 

risultato di: 

a) fornire il numero di byte di 
memoria RAM liberi. Se tale 
numero è negativo, bisogna 
sommargli 65536 per ottenere il 
corretto risultato 

b) leggere un carattere per volta dal 
buffer della tastiera. Il buffer non 
deve però contenere più di 

10 caratteri 

c) fornire la parte intera dei numeri 
positivi troncando i decimali. Dei 
numeri negativi con decimale, 
fornisce il numero negativ 
immediatamente inferiore 

d) assegnare i dati alle variabili 

e) cancellare il programma BASIC 
presente in memoria con tutte le 
variabili. Si usa prima di iniziare a 
scrivere un programma 

Vedere le risposte a pagina 44 
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Tips&TricI 

A cura di A. Cattaneo ■ ■ 

(S 

12 -| RAM SAVE 

Il Commodore 64 ha più memoria dispo¬ 
nibile di quanto non potete immaginare. 
Questa potente utility vi mostra come 


5 REM- 

10 REM SPRITE+JOY 128/40 
COLONNE 

15 REM BY ANDY CAPP 031- 
492093 


attingere dalla RAM per utilizzare un'a¬ 
rea immagazzinata di scorta o un sostituto 
per i programmi in ROM del C64. Riusci¬ 
rete così a cambiare l’aspetto del vostro 
computer. E’ richiesta l’unità drive. 

15 PRINT" { CLR )" :POKE 

646, 14 :POKE53280, 14 : 
POKE53281,6 

20 F0RI=49152T049381:READ 

A:POKEI,A:X=X+A:NEXT 
30 IFXO35805THEN 

PRINT"ERROR IN DATA 
STATEMENTS": END 
4 0 PRINT" {CLRHWHITEH 13 
SPC JCOPYRIGHT 1988" 

45 PRINT" {7 SPC}COMPUTE! 

PUBLICATIONS, INC." 

50 PRINTTAB(11)"ALL 
RIGHTS RESERVED" 

60 PRINT"{2 CUR.GIU}{5 

SPC)64 KERNAL RAM SAVE 
IS{YELLOW)ACTIVE 
(WHITE)." 

70 PRINT"{2 CUR.GIU)(6 

SPC)CALL USING THE 
FOLLOWING:" 

80 PRINT"{CUR.GIU}{6 

SPC)SYS49152,S-65536,E 
-65535,N$" 

90 PRINT"{2 CUR.GIU){3 
SPC)WHERE {YELLOW)S 
(WHITE){2 SPC)IS 
STARTING ADDRESS," 

100 PRINTTAB(9)"(YELLOW) 
E(WHITE} { 2 SPOIS 
ENDING ADDRESS," 

110 PRINTTAB(9)"(YELLOW) 

N$(WHITE) IS FILE NAME 
+ \P,W'" 

120 DATA32,253,174,32, 

158,173,32,170,177,141 
130 DATA234,192,140,233, 
192,32,253,174,32,158 
140 DATA173,32,170,177,14 
1,236, 192,140, 235, 192 
150 DATA32,253,174,32,158 
,173,160,0,177,71 
160 DATA141,230,192,200,17 
7,71,141,231,192,200 
170 DATA177,71,141,232, 
192,162,8,138,160,2 
180 DATA32,186,255,160,0, 
173,230,192,174 ,231 
190 DATA192,172,232,192, 
32,189,255,32,192,255 


200 DATAI 62,8,32,201,25 
5,173,233,192,133,253 
210 DATA32,210,255,173,23 
4,192,133,254,32,210 
220 DATA255,32,125,192,56 
,173,235,192,237,233 
230 DATAI 92, 133,251,173,23 

6.192.237.234.192.133 
240 DATA2 52,32,162,192, 

96,120,165,1,41,248 
250 DATA133,1,96,165,1, 
9,7,133,1,88 

260 DATA96,32,133,192,162, 
0,189,0,207,32 
270 DATA210,255,232,236,23 
,192,208,244,32,125 
280 DATAI 92,96, 166,252, 

240,27,202,134,252,160 
290 DATA0,162,0,177,253, 
157,0,207,232,200 
300 DATA208,247,140,237,19 
2,32,141,192,230,254 
310 DATA76,162,192,166,25 
1,164,251,240,19,142 
320 DATA237,192,202,136, 
177,253,157,0,207,136 
330 DATA202,224,255,208, 

245.32.141.192.32.133 
340 DATAI 92,32,204,255, 

169,8,32,195,255,96 
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LA MANINA 


Lo sprite è stato ottenuto tramite SPRDEF 
e rappresenta una mano destra con l’indi¬ 
ce puntato: viene caricato in 45, acceso in 
50 e posizionato in 65-75. Un menu di 
sette opzioni (90-170) permette una di¬ 
screta scelta di sottoprogrammi, scelta 
comunque ampliabile o riducibile per 
ogni personalizzazione del programma. 
Lo sprite viene asservito al joystick in 
porta 2 tramite le istruzioni da 235 a 275 
ed il joy lo muove secondo quanto impo¬ 
stato in 185-220. 11 pulsante di Tire 
(J=l 28) permette le scelte espresse in 
310-340, se corrette, od in 355 se fuori 
bersaglio. In quest’ultimo caso un mes¬ 
saggio di errore, istruzioni 10005-10030, 
permette il ritorno al menu. 


20 

25 

30 

40 

45 

50 

55 

60 

65 

70 

75 

80 

85 

90 

95 

100 

105 

110 

115 

120 

125 

130 

135 

140 

145 

150 

155 

160 

165 

170 


175 

180 

185 

190 

195 

200 

205 

210 

215 


REM- 


REM COLORI SFONDO, 
BORDO, CARATTERI 
COLORO,16:COLOR4,13: 
COLOR5,12 
REM CARICAMENTO 
SPRITE 1 
BLOAD"MANO",BO 
PRINT"*" : 

SPRITE1,1,1 

REM- 

REM POSIZIONAMENTO 
SPRITE 1 
X=315:Y=230 
MOVE SPR1,X,Y 
Xl=X+2:Y1=Y 

REM- 

REM DISEGNA FINESTRA 
OPZIONI 
Q$ = "Bl O B " 

COLOR5,1 
PRINTTAB(12) "I 
OPZIONE 1 B ";Q$:PRINT 
COLOR5,2 

PRINTTAB(12) "* OPZIONE 

2 B" ; Q$ : PRINT 
COLOR5,3 

PRINTTAB(12) "® OPZIONE 

3 B";Q$: PRINT 
COLOR5,12 

PRINTTAB(12) "® OPZIONE 

4 B";Q$: PRINT 
COLOR5,5 

PRINTTAB(12) "® OPZIONE 

5 B";Q$: PRINT 
COLOR5,10 

PRINTTAB(12) "® OPZIONE 

6 S";Q$: PRINT 
COLOR5,7 

PRINTTAB(12) "® OPZIONE 

7 B";Q$; PRINT 
COLOR5, 

PRINT' 1 

PUNTAMENTO+FIRE = 
SCELTA OPZIONE E' 

REM- 

REM INCREMENTI 
COORDINATE 
IX (1 ) =0 :IY(1)=-l 
IX(2)=2:IY(2)=-1 
IX(3)=2 :IY(3)=0 
IX(4)=2 :IY(4)=1 
IX(5)=0 :IY(5)=1 
IX(6)=-2:IY(6)=1 
IX(7)=-2:IY (7)=0 
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220 IX(8)=-2:IY(8)=-1 

225 REM- 

230 REM ASSERVIMENTO AL 
JOYSTICK PORTA 2 
235 J=JOY(2) 

240 IFJ=0THEN235 
245 MOVSPR1,XI,Y1 
250 IFJ=128THENG0T0295 
255 IFJ>128THEN275 
260 IFJ<10RJ>8THEN295 
265 X1=X1+1X(J):Y1=Y1= 

1Y ( J) 

270 J=0:G0T0235 

275 J=0:G0T0235 

275 J=J-128 

280 REM- 

285 REM LETTURA COORDINATE 
SPRITE 1(0!) 

295 A=PEEK (53248) :B=PEEK 
(53249) : REM A=ASCISSA 
BORDI NATA 

300 REM- 

305 REM INVIO AI 

SOTTOPROGRAMMI 
310 IFA>225ANDA<230ANDB> 
82ANDB<8 9ANDJ=128 
THEN1000 

315 IFA>225ANDA<230ANDB> 
100ANDB<107ANDJ=128 
THEN2000 

320 IFA>225ANDA<230ANDB> 
117ANDB<122ANDJ=128 
THEN3000 

325 IFA>225ANDA<230ANDB> 
132ANDB<138ANDJ=128 
THEN4000 

330 IFA>225ANDA<230ANDB> 
145ANDB<152ANDJ=128 
THEN5000 

335 IFA>225ANDA<230ANDB> 

162ANDB<169ANDJ=128 
THEN6000 

340 IFA>2 2 5ANDA<2 30ANDB> 

17 8ANDB<18 5ANDJ=128 
THEN7 000’ 

345 REM- 

350 REM E SE SI SBAGLIA 
APPUNTAMENTO.... 

355 GOTOl0000 

1000 REM- 

1005 REM SOTTOPROGRAMMA 1 
1010 SPRITE1,0:PRINT"»" 
1015 REM RESTO DEL 

SOTTOPROGRAMMA.... 

1999 END 

2000 REM- 

2005 REM SOTTOPROGRAMMA 2 
2010 SPRITE1,0 :PRINT"»" 
2015 REM RESTO DEL 

SOTTOPROGRAMMA.... 

2999 END 

3000 REM- 

3005 REM SOTTOPROGRAMMA 3 
3010 SPRITE1,0 :PRINT"»" 
3015 REM RESTO DEL 


SOTTOPROGRAMMA.... 

3999 END 

4000 REM- 

4005 REM SOTTOPROGRAMMA 4 
4010 SPRITE1,0:PRINT"»" 
4015 REM RESTO DEL 

SOTTOPROGRAMMA.... 

4999 END 

5000 REM- 

5005 REM SOTTOPROGRAMMA 5 
5010 SPRITE1,0:PRINT"»" 
5015 REM RESTO DEL 

SOTTOPROGRAMMA.... 

5999 END 

6000 REM- 

6005 REM SOTTOPROGRAMMA 6 
6010 SPRITE1,0:PRINT"»" 
6015 REM RESTO DEL 

SOTTOPROGRAMMA.... 

6999 END 

7000 REM- 

7005 REM SOTTOPR. 7 
7010 SPRITE1,0 :PRINT 

//M/f 

7015 REM RESTO DEL 
SOTTOPR.... 

7999 END 

10000 REM- 

10005 REM AVVISO 

10010 SPRITE1,0 

10015 COLORO,2:COLORI, 

7:COLOR5,1 

10020 PRINT"»" : PRINT 

TAB ( 8 ) " {'X'WMMXa 

ERRORE DI 
PUNTAMENTO! H " 

10025 FORD=lTO1500 : 

NEXTD 

10030 GOTOl0 

READY. 
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SYS STAMPER 


I numeri presenti nelle SYS rimpiazzano 
i numeri di estensione del file. Per leggere 
gli indirizzi SYS. componete una directo¬ 
ry normale e vedrete che gli indirizzi sono 
letti prima dei nomi del file. Questo pro¬ 
gramma modifica le tracce della directory 
rimpiazzando l’estensione del file con i 
numeri che immetterete. 1 file rimangono 
inalterati. Potete cancellare gli indirizzi di 
stampa salvando il programma con gli 
stessi nomi. 

15 POKE 53280,0:POKE 
53281,0:POKE 646,5 
20 DIMBY$(255):T=18: 

S=1:DN$="{15 CUR.GIU}" 

:Z$=CHR$(0) 


30 PRINT"(CLR){3 SPC) 
COPYRIGHT 1988 
COMPUTE! PUB., INC." 

40 PRINTTAB(ll)"ALL 

RIGHTS RESERVED":FORI= 
1T01750:NEXT 

50 BL$="{40 SPC}":BL$=" 

{CUR.SU)"+BL$+BL$+"{2 
CUR.SU)" 

60 OPEN15,8,15,"IO”:GOSUB 
300:OPEN5,8,5,"#" 

70 PRINT"(CLR)SYS 

STAMPER{2 SPC)";:PRINT 
#15,"UA:"5;0;T;S:N=0 
80 PRINT#15,"B-P:"5;0 : 

GET#5,T$,S$:IFASC(T$ + 
Z$)=0THENPRINT"{RVS 
ONJLAST SECTOR"; 

90 PRINT:PRINT 

100 F0RI=2T0226STEP32: 

PRINT#15,"B-P:"5;I 
110 FORJ=ITOI+18:GET#5, 

BY$(J):NEXT:GOSUB300 
120 PRINT#15,"B-P:"5;1+ 

28 :GET#5,BY$ (1+28), 

BY$ (1+29) 

130 BL=ASC(BY$(1+28)+Z$) 
+256*ASC(BY$(1+29)+Z$) 
140 IF(ASC(BY$(I)+Z$) 
AND127)=0THEN170 
150 N=N+1:BL(N)=BL:BY 

(N)=1 :PRINT"(RVS ON) 
"N"{RVS OFF)(CUR.SIN) 
"BL(N), 

160 FORK=I+3TOI+18STEP4: 
PRINTBYS(K)BY$(K+l) 

BY$(K+2)BY$(K+3); : 
NEXT:PRINT 

170 NEXT:N=N+1:PRINT: 

PRINT"(RVS ON}"N"{RVS 
OFF) = NEXTSECTOR": 
PRINT"(RVS ON)"0"(RVS 
OFF) = QUIT(HOME}" 

DN$ ; 

180 X=0:PRINTBL$;:PRINT 

"ENTER SELECTION." 

190 GETX$:X=VAL(X$): 
IFX$<"0"ORX$>"9" 
ORX>NTHENl90 
200 IFX=NORX=OTHENONX 
+1GOTO320:GOTO280 
210 PRINT"(HOME}(CUR. 

GIU)"LEFT$(DN$,X) 

X"(HOME}"DN$; 

220 NV=-1:PRINTBL$; : 

INPUT"ENTER STAMP"; 

NV:NV=INT(NV) 

230 IFNV<OORNV>65535 
THEN270 

240 HI=INT(NV/256):LO=NV- 
HI*256 :BL(X)=NV 
250 PRINT#15,"B-P:"5;BY 
(X)+28 :PRINT#5,CHR$ 

(LO);CHR$(HI); 

260 PRINT#15,"U2:"5;0;T; 
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270 


280 


290 

300 

310 


320 


S:GOSUB300 

PRINT"{HOME}{CUR.GIU} 
"LEFTS(DN$,X)"{RVS 
ON}"X"{RVS OFF}{CUR. 
SIN}"LEFT$(STR$(BL 
(X))+"{4 SPC}",6) " 

{HOME}"DN$;:GOTO180 
T=ASC(T$+Z$):S=ASC 
(S$+Z$):IFT=0THENT= 

18 : S=1 
GOTO70 

INPUT#15,E,E$,ET,ES 
:IFE=OTHENRETURN 
PRINT"{CUR.GIU}ERROR 
#"E"{CUR.SIN},"E$", 
"ET"{CUR.SIN},"ES 
CLOSE5:CLOSE15 
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EASY LOAD 


Usate le directory listing come menu e 
caricate ogni file semplicemente scriven¬ 
do LOAD davanti al nome del file. Per 
C64,128, Plus/4 o 16. E’ richiesta l’unità 
drive. 


160 


170 


180 


190 


200 

210 

220 

230 

240 

250 

260 

270 


125 


ABORTICUR.GIU}" 

INPUT"ENTER CHOICE (1- 430 

3) " ;CHOICE:L=LEN(A$): 
IFCHOICE=3THENPRINT 
: GOTO100 

GOSUB390:IFCHOICE=l 
ANDL>120RCH0ICE=2AND 
L>11THENGOSUB390: 

GOSUB290 _ 

IFCHOICE=lTHENOPEN 
15,8,15,"R:"+A$+"{CBM 
D}8{SH @}=:"+A$: 

CLOSE15 

IFCHOICE=2THENOPEN 
15,8,15,"R:"+A$+"{CBM 
D}8{CBM D}1=:"+A$: 

CLOSE15 

GOSUB370:PRINT"ANOTHER 
FILENAME? (Y/N)" 

GETP$:IFP$=""THEN210 
IFP$="Y"THENPRINT: 

GOTOIOO 
PRINT"{CLR}":END 
OPEN1,8,0,"$0”: 20 

PRINT"{CLR}{RVS ON}"; 

GET#1,B$ : IFSTO0 
THEN280 30 

IFB$<>CHR$(34)THEN250 
PRINTBS; :F0RI = 1T017: 

GET#1,B$:PRINTB$;:NEXT 


NEXT: RETURN 
REM7:F0RI=1T03: RETURN 
1,440,8:FORJ=1T02 0 0 : 
NEXT:NEXT: RETURN 


THREE PACK 





I :PRINT:IFST=0THEN250 

40 

20 

IFPEEK(65530)=5THEN15 

280 

CLOSE1:GOSUB370:RETURN 


30 

PRINT"{CLR}{BLACK}{3 

290 

D=12+(CHOICE=2):G$= 

50 


SPOCOPYRIGHT 1988 


"CHARACTERS":D=L-D:IF 



COMPUTE! PUB., INC." 


D=1THENG$=LEFT$(G$, 9) 


40 

PRINTTAB(11)"ALL 

300 

PRINT"{CUR.GIU}FILE 

60 


RIGHTS RESERVED" 


NAME TOO LONG BY"D; 


50 

PRINTTAB(6)"{3 CUR. 


G$". " 

70 


GIU}{RVS ON}EASY LOAD 

310 

PRINT"WOULD YOU LIKE 



FILENAME CONVERTER" 


TO SHORTEN IT (Y/N)?" 

80 

60 

PRINT"{CUR.GIU}(SINCE 

320 

GETPS:IFP$=""THEN320 



THE ADD-ONS BECOME 

330 

IFP$<>"Y"THENRUN 

90 


PART OF THE" 

340 

PRINT"{CUR.GIU}OLDNAME 


70 

PRINT"FILENAME, THE 


:"A$: INPUT"NEW NAME:" 

100 


ENTIRE NAME MUST BE 


;B$ 



16":PgINT"CHARACTERS 

350 

OPEN15,8,15,"R:"+B$+ 

110 


OR LESS.)" 


"="+A$:CLOSE15 :A$=B$: 


80 

PRINT"{CUR.GIU}ENTER $ 


GOSUB370:RETURN 

120 


AT THE FILENAME PROMPT 

360 

EM READ ERROR CHANNEL 



TO LIST" 

370 

OPEN15,8,15:INPUT# 

130 

90 

PRINT"THE DIRECTORY, 


15,E1$,E2$,E3$,E4$: 



OR E TO EXIT THE 


PRINT"{CUR.GIU}"E1$"" 

140 


PROGRAM." 


E2$:CLOSE15 : RETURN 


100 

INPUT"FILENAME (OR $ 

380 

REM GONG 

150 


OR E) ";A$ 

390 

IFPEEK(65530)=164 


110 

IFA$="E"THENPRINT" 


THEN430 

160 


{CLR}":END 

400 

S=54272:POKES + 24,0 : 


120 

IFA$="$"THENGOSUB 


FORH=0TO24:POKES+H, 

170 


240:GOT0100 


0 :NEXT 


130 

PRINTTAB(4)"{CUR.GIU}1 

410 

POKES+1,60 :POKES + 5,9: 

180 


- TO ADD ',8:' (ADDS 4 


POKES+15,10:POKES+24, 



CHARS)" 


15:F0RH=1T03 


140 

PRINTTAB(4)"2 - TO ADD 

420 

POKES+4,21:F0RT=1T06 



',8,1' (ADDS5 CHARS)" 


00:NEXT:POKES + 4,20 : 


150 

PRINTTAB(4)"3 - TO 


FORT=lTO100:NEXT: 



Questa corta utility aggiunge tre utili 
comandi al vostro C64: Place, Erase e 
Beep. Con una SYS potrete posizionare il 
cursore, cancellare un gruppo di linee 
sullo schermo o emettere un suono beep. 
Three Pack è compatto, conveniente e 
facile da usare. Per usare Three Pack inse¬ 
rite queste tre variabili all'inizio del pro¬ 
gramma: 

PL=53121 :ER=53146:BP=53192 


PRINT"{CLR}{BLACK}{3 
SPOCOPYRIGHT 1988 
COMPUTE! PUB., INC." 
PRINTTAB(10)"ALL 
RIGHTSRESERVED{CUR. 
GIU}":PRINT"ACTIVATING 
THREE PACK..." 
F0RI=53121T05324 7: READ 
A : X=X+A : POKEI, A : NEXT 
IFX019218THENPRINT" 
ERROR IN DATA 
STATEMENTS.": END 
DATA 32,185,207,201, 

25.176.61.133.251.32 
DATA 185,207,201,40, 
176,52,133,211,165,251 
DATA 133,214,76,108, 

229.32.185.207.133.253 
DATA 32,185,207,240, 

33.133.254.24.101.253 
DATA 201,26,176,24, 
166,253,32,255,233,230 
DATA 253,198,254,208, 

245.96.32.253.174.32 
DATA 158,173,32,247, 
183,165,20,96,76,72 
DATA 178,169,0,133,25 
3,169,212,133,254,160 
DATA 1,169,50,145, 
253,160,5,169,9,145 
DATA 253,160,24,169, 
15,145,253,160,4,169 
DATA 17,145,253,169, 
200,133,252,162, 0,202 
DATA 208,253,198,252, 
208,249,160,0,152,145 
DATA 253,200,192,24, 
208,249,96 
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i lettori 
ci scrivono... 



IN RISPOSTA AD ANDREA 

Le riflessioni contenute nell'articolo 
"Sintetizziamo un po’ ” di Andrea Zombo- 
nini sulla rubrica Orizzonti del n° 36 di 
Supercommodore, non fanno una grinza. 
Ha toccato i punti fondamentali con invi¬ 
diabile sintesi: difficile perciò aggiunge¬ 
re altro. 

Personalmente possiedo un C64 correda¬ 
to di molte periferiche: due drive, una 
RAM. un mouse, una stampante grafica 
ed il software Geos al completo salvo 
applicazioni piuttosto marginali ed è per 
questo che mi sento in grado di esprime¬ 
re un giudizio favorevole su quanto affer¬ 
mato dall'articolista. Proporrei di dare 
più spazio alla parte che riguarda Geos 
compresa la programmazione sia in 
BASIC che in Assembler e di incoraggiare 
la formazione di circoli di utenti C64 che 
si interessino di applicazioni diverse da 
quelle dei games. 

P. Masoni - S. Giovanni V. (AR) 

Prendiamo atto di quanto ci scrive Paolo e 
siamo sicuri che , oltre a lui, la pensano 
così la stragrande maggioranza dei nostri 
lettori. Prendiamo atto anche dello spazio 
Geos e della formazione di circoli: nei 
limiti del possibile, faremo quanto di me¬ 
glio ci sia dato. 


SI 


MESSAGGI CUSTOM SUL C64 

Non mi ricordo in quale occasione mi sia 
capitato di sentir parlare di messaggi, 
propri del sistema del C64, personalizzati 
a piacimento dall'utente. Se una tale ope¬ 
razione fosse possibile, gradirei sapere 
come procedere per crearmi un sistema 
originale ed evadere così dalla norma. 
Potete aiutarmi? 

S. Merli - BOLOGNA 


Tutti i messaggi dei quali il sistema opera¬ 
tivo del C64 fa uso, sono memorizzati in 
ROM (Read Only Memory). Per cambia¬ 
re i messaggi è quindi necessario copiare 
il contenuto della ROM in un'area RAM, 
escludere la ROM e POKare i nuovi carat¬ 
teri al postodi quelli originali: resta inteso 
che il tutto si azzera allo spegnimento del 
computer, il primo passo, copiare su 
RAM il BASIC della relativa ROM, è 
semplicissimo, basta dare l'istruzione: 

FORI = 40960 TO 49151: POKEI, 
PEEK(I): NEXT 

Si tratta di un loop FOR-NEXT abbastan¬ 
za lungo che dura all'incirca mezzo minu¬ 
to. Il passo successivo è quello di esclude¬ 
re la ROM del BASIC: 

POKEI, PEEK(l) AND 254 

Fatto questo, abbiamo portato l'interprete 
BASIC a lavorare in area RAM, pertanto 
è necessario battere e dare il RUN al breve 
programma che segue: 

10 MS$="OK.": MA=41848 
20 FORI = 1 TO LEN(MS$): 


POKEMA+I-1,ASC <MID$ 
(MS$,1,1)):NEXT 

MS$ è il nuovo messaggio e MA è l’indi¬ 
rizzo di memoria del messaggio originale. 
Non appena darà il RUN, le due linee di 
programma di cui sopra cambieranno il 
familiare prompt READY in OK. Basta 
quindi conoscere gli indirizzi di memoria 
dei messaggi per poterli cambiare a piace¬ 
re. Poiché i messaggi sono memorizzati 
sequenzialmente (non di seguito all’altro), 
i nuovi messaggi che introdurrà, non do¬ 
vranno essere più lunghi di quelli origina¬ 
li, al massimo uguali; in caso contrario, la 
fine del messaggio andrà a cancellare lo 
start del messaggio successivo invalidan¬ 
dolo. Usando questa stessa tecnica le sarà 
possibile personalizzare anche i vari 
comandi BASIC a patto di sostituirli con 
altrettanti della stessa lunghezza in modo 
da rispettare il processo di tokenizzazio- 
ne. Poiché, come READY, anche i co¬ 
mandi BASIC e i messaggi di errore ven¬ 
gono memorizzati dal set alto di bit del¬ 
l'ultimo carattere (il suo valore ASCII più 
128), l'interprete BASIC non avrà diffi¬ 
coltà a riconoscere la fine dei messaggi. 
Per poter far lavorare il programma anche 
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con i comandi BASIC e i messaggi di 
errore, dovrà aggiungere pertanto la linea 
seguente: 

30 POKEMA + LEN(MS$)-1, 
ASC(RIGHT$ (MS$,1)) 

+ 128 

Per vedere se tutto funziona a dovere, 
provi a fare qualche esperimento. Cambi 
ad esempio RUN con GO!: 

10 MS$="GO!": MA=41157 

oppure STOP con HALT: 

10 MS$="HALT": MA=41183 

oppure FORMULA TOO COMPLEX in 
MI SONO CONFUSO 

10 MS$="MI SONO CONFUSO": 
MA=41709 

Come può vedere, il segreto per poter 
operare questi cambiamenti è il conoscere 
l'indirizzo in ROM dei messaggi origina¬ 
li. Come conoscerli? Batta il programmi¬ 
no che segue e lo vedrà! 

10 C=255: PRINT"INDIRIZZO 

MESSAGGI" 

20 FORAD=41118 TO 41767 

30 IFC>127 THEN PRINT: 

PRINT AD, 

40 C=PEEK(AD): PRINT 
CHR$(C AND 127); 

50 NEXT 




DUE SINGLE DRIVE 
NON SONO UN DUAL DRIVE 

Posseggo un CI28 con un disc drive 1571 
settato come device 8 e un 1541 settato 
come device 9. Quando tento di fare il 
backup di un disco usando: COPY DO TO 
DI oppure BACKUP DO TO DI, il siste¬ 
ma non lavora correttamente. Esiste una 
ragione? 

M. Pacetti - ROMA 

Una ragione esiste eccome e sta nel fatto 
che sia il comando COPY che il comando 
BACKUP lavorano solamente con i dual 
disc drive. Molto probabilmente le due 
cose sono state confuse: dual drive non è 
la stessa cosa di due drive. Nel setup 
corrente, infatti, ognuno dei due disc drive 
viene considerato un device separato, uno 


con l'etichetta 8 e l'altro con l'etichetta 9. 
Ognuno di essi contiene un solo drive ed 
entrambi sono considerati come drive 0. 
Il dual drive, al contrario, viene conside¬ 
rato un device contenente fisicamente due 
drive con etichetta 0 e 1. Sfortunatamente, 
non vi è alcuna possibilità (se non cam¬ 
biando le ROM esistenti nel 1541 e nel 
1571 con altrettante customizzate) di 
convertire due disc drive in un unico dual 
drive in quanto non è possibile assegnare 
ad uno dei due l'etichetta 1. 

In effetti i comandi COPY e BACKUP 
sono stati tramandati dal PET il quale 
aveva appunto due disc drive in comune 
funzionanti come dual drive. Esempi di 
dual drive sono il 2040, il 3040, il 4040 e 
l'8050. Ogni versione successiva ha risen¬ 
tito dello sviluppo del DOS, delle miglio¬ 
rie meccaniche e, in alcuni casi, anche 
dello spazio libero dei dischi. Questi drive 
non sono ormai più reperibili neanche 
presso la Commodore. Nel caso fortuito 
che riuscisse anche a reperirne uno, non lo 
potrebbe impiegare con il Plus 4, il C16, il 
C64 o il CI28 se non con un apposito 
cavetto di interfaccia a norme IEEE. 




USER PORT COME OUTPUT 

Visto che la User Port può funzionare 
come una qualsiasi locazione di memoria 
per cui vengo a chiedere come scrivere 
dei dati nelle locazioni di memoria con l'i¬ 
struzione POKE. 

Raoul - AOSTA 

Il programma che segue dimostra come i 
dati possano venire conservati e richiama¬ 
ti dalla memoria con POKE e PEEK. Ecco 
come funziona. Alla linea 20 il program¬ 
ma attende che venga digitato un carattere 
dalla tastiera; alla linea 50 questi caratteri 
sono convertiti nei loro codici ASCII 
equivalenti e inseriti con POKE nelle 
locazioni di memoria a partire dalla 6000. 
Nella routine è stata scelta la locazione 
6000 perché i dati conservati a partire da 
questa locazione non interferiscono con il 
programma né con le altre operazioni 
svolte dal computer durante il program¬ 
ma. Alla linea 30 il programma controlla 
se è stato digitato un carattere speciale 
(l'asterisco * non viene utilizzato troppo 
frequentemente, ma si sarebbe potuto 
usare un qualsiasi altro carattere o simbo¬ 
lo presente sulla tastiera). Quando viene 
rilevato questo carattere speciale, ha ter¬ 
mine la fase di immissione dei dati: a 


questo punto il programma salta alla linea 
70 che comincia la fase di lettura delle 
locazioni di memoria con PEEK a partire 
dalla locazione 6000.1 caratteri conserva¬ 
ti in queste locazioni vengono visualizzati 
uno per volta, fino all'ultimo carattere 
immesso. Ecco il programma: 


10 

A=6000 


20 

GET A$: IFA$="" 

THEN 

30 

IF A$="*" THEN 

70 

40 

PRINT A$; 


50 

POKEA, ASC(A$) 


60 

A=A+1: GOTO20 


70 

PRINT 


80 

FORR=6000 TO A 


90 

PRINT CHR$(PEEK(R)); 

100 

NEXT 





CODICE 16 

A cosa serve il codice 16? 

A. Santalmassi - PERUGIA 

Il codice 16 serve per fissare la colonna di 
inizio stampa tra 0 e 79; il numero deve 
essere introdotto come CHRS(N) con N 
variabile da 48 a 57. Nel programma che 
segue, viene stampata una linea di riferi¬ 
mento numerata per segnare 40 colonne di 
stampa. I codici delle cifre che danno la 
colonna sono passati con un DATA alla 
linea 27; le colonne sono: 00 (48,48), 15 
(49, 53)e 30 (51,48). 

1 REM CHR$(16)-1 
10 OPEN 10,4 
15 CMD10: A$="" 

20 DATA0,1,2,4,8,16,32, 
64,32,17,10,4 

25 DATA10,17,32,64,32,16, 

8 , 4 , 2 , 1 , 0,0 

27 DATA4 8,48,49,53,51,48 
30 FORI=l TO 24 
35 READA 

40 A$=A$+CHR$(A+128) 

45 NEXTI 

47 FORK=0 TO 4: FORI=0 TO 
9: PRINT CHR$(48+1); 

48 NEXTI: NEXTK: PRINT 

50 FORI=0 TO 2: READX,Y 

55 PRINT CHR$(15) CHR$(16) 

CHR$(X) CHR$(Y); I;CHR$ 
(8) A$; 

60 NEXTI 

65 PRINT#10, CHR$(15): 
CLOSE10: STOP 

Kl 
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WWW 

STARBURST 

GRAPHICS 


C osa potete ancora escogi¬ 
tare per sbalordire gli ami¬ 
ci? Provate Starbust Gra¬ 
phics. Con più di 20 opzioni 
questo programma in linguaggio mac¬ 
china disegna figure e composizioni 
colorate sullo schermo ad alta risolu¬ 
zione del 64. Al centro dello schermo 
fa capolino un gruppetto di stelle, l'e¬ 
lemento di partenza per la nostra piro¬ 
tecnia. E' facile regolare il percorso 
delle stelle, che assumono l'aspetto di 
fuochi d’artificio, simulano nebulose e 
galassie, onde che s'increspano, ca¬ 
leidoscopi, vortici ed altro ancora. 

Come iniziare 

Predisporre l'uso di questo program¬ 
ma è, come sempre, molto semplice: 
il codice in linguaggio macchina deve 
essere riportato sul calcolatore utiliz¬ 
zando l'MLX. Il programma d’inseri¬ 
mento chiederà due indirizzi, stampati 
nelle righe successive. 

INDIRIZZO INIZIALE:0801 
INDIRIZZO FINALE: 15C8 

Completata l’operazione d’inserimen¬ 
to, salveremo il file prima di uscire 
dall'MLX. 

Nonostante il linguaggio in cui è stato 
scritto, è stata adattatalo in modo tale 
perchè il programma si possa caricare 
e lanciare con le funzioni BASIC. Lo 
schermo di presentazione con una 
lista dei comandi possibili (vedi tabel¬ 
la) viene stampato a fine caricamento. 
Si tratta di una lista a semplice titolo di 
riferimento, poiché i comandi hanno 


Un programma per 64 unico 
nel suo genere che 
permetterà di comporre ed 
orchestrare fulgenti 
sinfoniedi immagini 
in alta risoluzione. 

Bob Masters 


effetto solo sullo schermo grafico. 

La pressione di un tasto qualsiasi 
avvia il gioco visivo. Una serie di stelle 
si propagherà dal centro dello scher¬ 
mo verso l’esterno. 

Prima di continuare è opportuno rego¬ 
lare luminosità e colore del monitor 
per avere un netto contrasto tra stelle 
e sfondo (un'effetto molto suggestivo 
si ottiene oscurando la stanza). Ora 
siamo pronti per provare le numerose 
opzioni di Starbust Graphics sul no¬ 
stro computer. 

L'esecuzione di ciascun comando si 
ottiene premendo un singolo tasto, in 
qualsiasi momento e nell’ordine che si 
desidera. 

Per disattivare la funzione avviata, è 
sufficiente premere una seconda vol¬ 
ta lo stesso tasto. 

Una grande varietà di effetti si può 
ottenere combinando tra loro le possi¬ 
bilità offerte. Inoltre, se lo schermo 
dovesse diventare un guazzabuglio 
d’effetti, premete il tasto D per riporta¬ 
re le opzioni allo stato di default. 


Una galassia di opzioni 

In partenza, le stelle appaiono come 
punti colorati che si muovono nel 
campo dello schermo. 

Perchè lascino una traccia al loro 
passaggio, premete il tasto C (conti- 
nuos drawing); per disattivare l'opzio¬ 
ne premete ancora C. Con i tasti da 1 
a 9 possiamo dotare tutte le stelle di 
una coda, la cui lunghezza è propor¬ 
zionata al valore inserito: la funzione 
si disattiva con 0 oppure T. 

Raggiunti i limiti dello schermo, le 
stelle scompaiono dal campo visivo e 
sono sostituite da nuovi elementi; 
perchè rimbalzino sui bordi o tornino 
nella direzione di provenienza usiamo 
i tasti B (bounce) o J (jump). 

Con il tasto N definiamo il numero di 
stelle. Inseriamo un numero nell’Inter¬ 
vallo 1-256 (il valore di default è 80) 
oppure, in caso il numero attuale sia 
soddisfacente, battiamo RETURN. 
Per ciò che riguarda i colori, i tasti fi, 
f3 ed f5 passano da uno dei tre colori 
disponibili all’altro, come in un ciclo, 
mentre f7 ripristina lo status standard. 
Abbiamo poi due funzioni particolari 
per ottenere un’immagine speculare 
del percorso stellare: con il pulsante X 
la simmetria ruota sull’asse orizzonta¬ 
le, mentre con Y l'asse è verticale. 
Quando lo schermo diventa troppo 
confuso, premete CLR/HOME. Dopo 
la pulizia dello schermo, le stelle ri¬ 
prenderanno il loro cammino dal pun¬ 
to in cui le abbiamo interrotte. 

Questa opzione è utile quando una 
valida sequenza si perde in una 
schermata troppo affollata. La barra 
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spaziatrice funziona in modo simile al 
pulsante CLR/HOME, ma dopo la 
pulizia il percorso delle stelle viene 
modificato, ognuna di esse viene ri¬ 
portata alla posizione primitiva ed 
assume velocità e direzione nuove. E’ 
un’opzione che scoprirete molto pra¬ 
tica. 

Utilizzando per esempio le funzioni 
jump o bounce nel modo atom (che 
vedremo più avanti) le stelle si tratten¬ 
gono sullo schermo illimitatamente. 
Per costringerle al di fuori del campo 
visivo e rimpiazzarle con elementi e 
direzioni nuovi e diverse useremmo 
questa funzione. Per interrompere 
momentaneamente il display grafico 
teniamo premuto SHIFT oppure usia¬ 
mo SHIFT LOCK. 

I moti principali 

Esistono quattro percorsi direzionali 
di carattere speciale: moto spiralifor- 
me, a fontana (o fuochi artificiali), 
oscillatorio (od ondulare) ed un movi¬ 
mento simile agli spostamemti degli 
elettroni nell’atomo. Ad essi corri¬ 
spondono, nell'ordine, i tasti S, F, O 
ed A. 

Sperimentate a turno queste quattro 
possibilità usando i suddetti tasti e, tra 
una prova e l’altra, servitevi del tasto 
D per ripristinare il display originario. 
Per ottenere un’interessante effetto 
ondulare verificate questa sequenza: 
premete DN e definite il numero di 
stelle come 12; poi premete OC VBXY 
(il comando V è trattato nei paragrafi 
immediatamente seguenti). Per mo¬ 
dificare il percorso, premete periodi¬ 
camente la barra spaziatrice. 

Ogni stella si sposta secondo la pro¬ 
pria direzione e velocità, entrambe 
casuali. 

Sono disponibili in tutto 14 diverse 
velocità. Per aumentare la velocità 
media premete V, incrementerete 
così la gamma di possibili velocità, e 
direzioni, disponibili per ciascuna 
stella. Bisogna anche sottolineare 
che il numero di elementi presenti 
sullo schermo esercita una certa in¬ 
fluenza sulla rapidità del loro movi¬ 
mento. Minore è la quantità di stelle, 


maggiore è la loro velocità. Talvolta, 
quando sullo schermo sono presenti 
solo poche stelle, il nostro occhio fati¬ 
ca a seguire persino le più lente. In 
questi casi, è possibile porre un limite 
alla velocità con il tasto P. 
Consideriamo la differenza tra l’opzio¬ 
ne di velocità ed il limite suddetto. La 
funzione corrispondente a V costitui¬ 
sce il controllo principale di direzione e 
velocità e si usa abbastanza spesso, 
mentre si ricorre a P solamente quan¬ 
do gli spostamenti sono troppo rapidi. 
Per comprendere meglio cosa si in¬ 
tende, digitiamo DF3N e scegliamo un 
numero di stelle pari a 4. Osserviamo 
la velocità delle stelle; ora alternata- 
mente premiamo V e P per confronta¬ 
re l'effetto dei comandi. Mediante i 
tasti H e W è permesso modificare le 
dimensioni dello schermo di display 
grafico: il primo pulsante riguarda l’al¬ 
tezza del campo, ed il secondo ne 
interessa la larghezza. Questi tasti, 
combinati od utilizzati separatamente, 
producono quattro differenti configu¬ 
razioni. 

Altre opzioni 

Normalmente le stelle scorrono dal 
centro del video verso l’esterno, pre¬ 
mendo Q irromperanno da tutti i lati. Il 
programma tenta comunque di rag¬ 
grupparle, in modo che compaiano a 
“grappoli". 

L'opzione Z non rappresenta altro che 
una variante a questa possibilità: il 
punto di partenza delle stelle rimane 
casuale, ma non vengono avvicinate 
in ammassi. 

Per un esempio, battiamo DN e inse¬ 
riamo 100 come nuovo numero di 
stelle: ora digitiamo ZW. Vedremo 
prender vita un movimento vorticoso 
simile al raggio trasportatore dell’En- 
terprise nella serie televisiva Star 
Trek. Un movimento casuale si ottiene 
con l’opzione R, adatta a creare effetti 
simili a quelli di un caleidoscopio. Pro¬ 
viamo per esempio questa combina¬ 
zione: DQRXYC. 

Premiamo spazio adesso ed in segui¬ 
to. per una nuova sequenza. Quando 
il moto è casuale l’opzione relativa alla 


coda stellare (1-9) agisce diversa- 
mente: determina la lunghezza del 
percorso tra un cambio di direzione e 
l’altro. Il movimento casuale delle 
code conferisce un senso rotatario 
alle opzioni direzionali (F, S, A e O). 
Per limitare la durata di ciascuna stel¬ 
la, serve la funzione L. Con questo 
comando esse rallentano e sparisco¬ 
no prima del normale. 

Pur non essendo usata di frequente, 
può dimostrarsi utile per simulare 
fuochi artificiali o spostamenti casuali. 
Perchè tutte le stelle sullo schermo 
assumano il medesimo colore, vi è 
l’opzione U (modo unicolor), partico¬ 
larmente appropriata a fuochi d’artifi¬ 
cio. 

Osservate ad esempio, nella sequen¬ 
za DFVQLU2, il contributo di ciascun 
comando al risultato finale. 


I COMANDI DI STARBUST GRAPHICS 


TASTO 

COMANDO 

X 

Simmetria speculare 
orizzontale 

Y 

Simmetria speculare 
verticale 

B 

Balzo 

J 

Salto all indietro 

1-9 

Lunghezza code 

0 o T 

Disattiva code 

C 

Disegno continuo 

N 

Numero di stelle 

U 

Modo unicolor 

fi -15 

Colori 

f7 

Reset colori 

D 

Ripristina parametri 
default 

H 

Altezza schermo 

W 

Larghezza schermo 

Q 

Punto di partenza casuale 
per l’intera esplosione 

Z 

Punto di partenza casuale 
per ogni stella 

M 

Menu comandi 

0 

Onda 

F 

Fontana 

S 

Spirale 

A 

Atomo 

Spazio 

Pulisce schermo 
e rinizia 

HOME 

Pulisce schermo 
e prosegue il movimento 
interrotto 

R 

Movimenti casuali 

V 

Velocità 

P 

Limite di velocità 

SHIFT 

Pausa 

L 

Durata limitata stelle 

RUN/STOP 

Esce 
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Unico limite, il cielo 
In qualsiasi momento, per chi dimen¬ 
ticasse tasti e funzioni, si ritorna al 
menu opzioni con il tasto M. I comandi 
saranno nuovamente attivi sullo 
schermo grafico. Dalla sperimenta¬ 
zione delle numerose possibilità di 
Starbust Graphics può derivare molto 
divertimento, ma ci vorrà un poco per 
prendere coscienza della varietà di 
qualità artistiche propria del prodotto. 
Nel frattempo, non resta altro che 
augurarvi buon viaggio tra le stelle! 


Listing di Starbust Graphics 


0801:0B 

08 

0A 

00 

9E 

32 

30 

36 

2E 

0809:31 

00 

00 

00 

A9 

00 

8D 

21 

3B 

0811:D0 

8D 

20 

DO 

20 

8A 

OF 

A9 

FO 

0819:20 

A0 

00 

8C 

AO 

17 

8D 

68 

OF 

0821:18 

8C 

30 

19 

8C 

58 

19 

A2 

92 

0829:06 

B9 

A0 

17 

18 

69 

01 

99 

32 

0831 :Al 

17 

B9 

68 

18 

69 

00 

99 

95 

0839:69 

18 

C8 

CA 

10 

EB 

CO 

C7 

43 

0841:F0 

15 

B9 

AO 

17 

18 

69 

39 

75 

0849:99 

Al 

17 

B9 

68 

18 

69 

01 

84 

0851:99 

69 

18 

C8 

4C 

28 

08 

AO 

CB 

0859:00 

B9 

30 

19 

18 

69 

08 

99 

7F 

0861:31 

19 

B9 

58 

19 

69 

00 

99 

15 

0869:59 

19 

C8 

CO 

27 

DO 

EA 

A9 

8D 

0871:52 

85 

F8 

A9 

06 

85 

F9 

A9 

A9 

0879:C8 

85 

9F 

A9 

28 

85 

9E 

85 

F7 

0 8 81 :BF 

A9 

4F 

85 

BE 

85 

AB 

A9 

2B 

0889:09 

85 

9B 

A9 

04 

85 

9C 

A9 

A6 

0891:00 

A0 

05 

99 

BO 

00 

99 

A5 

62 

0899:00 

88 

10 

F7 

8D 

CB 

16 

A9 

BE 

08A1:0B 

8D 

11 

DO 

20 

OA 

OF 

A9 

BA 

08A9:00 

85 

B6 

20 

21 

OF 

AO 

80 

FA 

08B1:8C 

18 

D4 

A9 

FF 

8D 

OE 

D4 

6A 

08B9:8D 

0F 

D4 

8C 

12 

D4 

A6 

BE 

A7 

08C1:A9 

00 

85 

FA 

20 

4A 

OF 

CA 

1A 

08C9:A5 

AA 

FO 

04 

E4 

BF 

90 

04 

01 

08D1:E0 

FF 

DO 

EC 

A9 

01 

85 

FA 

92 

08D9:A9 

D8 

85 

FE 

A9 

04 

85 

FC 

FA 

08E1:AA 

A0 

00 

84 

FB 

84 

FD 

A5 

4B 

08E9:F8 

91 

FB. 

A5 

F9 

91 

FD 

C8 

8F 

08F1:D0 

F5 

E6 

FC 

E6 

FE 

CA 

DO 

2E 

08F9:EE 

A9 

1D 

8D 

18 

DO 

A9 

D8 

98 

0901:8D 

16 

DO A9 

3B 

8D 

11 

DO 

17 

0909:A9 

00 

85 A2 

AC 

11 

DO 

AD 

C3 

0911:12 

DO 

DO 

04 

A9 

FA 

AO 

00 

35 

0919:38 

E9 

01 

85 

C4 

84 

F7 

C6 

29 

0921:B6 

10 

04 

A9 

04 

85 

B6 

A5 

F6 

0929:A5 

DO 

2B A6 

BE 

A5 

AA 

DO 

C4 

0931:18 

A4 

C4 

CC 

12 

DO 

DO 

FB 

4F 

0939 :AD 

11 

DO 

45 

F7 

30 

F4 

20 

5F 

0941:4F 

OD 

CA EO 

FF 

DO 

F8 

FO 

CB 
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0949 : OD 

BD 

80 

1E 

DO 

03 

20 

4F 

65 

0951 : OD 

CA 

E4 

BF 

BO 

F3 

A5 

A9 

7F 

0959:29 

02 

FO 

03 

20 

21 

OF 

AD 

20 

0961:1B 

D4 

29 

03 

C9 

03 

FO 

F7 

BF 

0969 :OA 

OA 

OA 

8D 

C5 

16 

A5 

A6 

95 

0971:F0 

08 

A5 

A2 

FO 

FC 

A9 

00 

AB 

0979:85 

A2 

CE 

CC 

16 

A6 

BE 

BD 

24 

0981:80 

1C 

C9 

80 

FO 

57 

A5 

AA 

F6 

0989:F0 

OF 

BD 

80 

1E 

FO 

OA 

E4 

45 

0991:BF 

90 

03 

DE 

80 

1E 

4C 

48 

53 

0999 :OA 

A9 

03 

8D 

C9 

16 

CE 

C9 

62 

09A1:16 

30 

3A 

A5 

A8 

FO 

08 

AD 

33 

09A9:CC 

16 

10 

03 

20 

28 

10 

A5 

41 

09B1:B6 

29 

01 

FO 

OE 

A5 

B4 

FO 

F9 

09B9:03 

20 

AC 

OE 

A5 

B3 

FO 

03 

AC 

09C1:20 

DD 

OC 

BD 

80 

19 

18 

7D 

CE 

09C9:80 

1C 

A8 

38 

E5 

B2 

C5 

9F 

EO 

09D1:BO 

07 

98 

9D 

80 

19 

4C 

F3 

DF 

09D9:09 

A5 

BO 

DO 

06 

20 

4A 

OF 

51 

09E1:4C 

48 

OA 

20 

5C 

OE 

A5 

BO 

86 

09E9:C9 

01 

FO 

B2 

20 

68 

OE 

4C 

75 

09F1:9F 

09 

BD 

80 

1B 

18 

7D 

80 

8A 

09F9:1D 

85 

C3 

C9 

08 

90 

1E 

BD 

8D 

0A01:80 

1A 

A8 

BD 

80 

1D 

10 

04 

69 

0A09:C8 

4C 

OE 

OA 

88 

98 

38 

E5 

F3 

0A11:B1 

C5 

9E 

BO 

OE 

98 

9D 

80 

DC 

0A19:1A 

A5 

C3 

29 

07 

9D 

80 

1B 

79 

0A21:4C 

3D 

OA 

A5 

BO 

DO 

06 

20 

3B 

0A29:4A 

OF 

4C 

48 

OA 

20 

68 

OE 

E3 

0A31:A5 

BO 

C9 

01 

FO 

BC 

20 

5C 

A4 

0A39:0E 

4C 

9F 

09 

A5 

AA 

FO 

04 

A9 

0A41 :E4 

BF 

BO 

03 

20 

47 

OD 

CA 

01 

0A4 9 :EO 

FF 

FO 

03 

4C 

80 

09 

AD 

40 

0A51:CC 

16 

10 

06 

AD 

CB 

16 

8D 

OA 

0A59:CC 

16 

AC 

11 

DO 

AD 

12 

DO 

32 

0A61: DO 

04 

A9 

FA 

AO 

00 

38 

E9 

23 

0A69:01 

85 

C4 

84 

F7 

AD 

8D 

02 

D3 

0A71: DO 

FB 

A5 

91 

30 

01 

00 

A5 

E5 

0A79:C6 

DO 

03 

4C 

20 

09 

A9 

00 

C2 

0A81:85 

C6 

AD 

77 

02 

C9 

44 

DO 

C7 

0A89:03 

4C 

70 

08 

C9 

4E 

DO 

03 

EC 

0A91:4C 

72 

10 

C9 

42 

DO 

OB 

A5 

18 

0A99:BO 

49 

01 

29 

01 

85 

BO 

4C 

D6 

0AA1:69 

OC 

C9 

4A 

DO 

OB 

A5 

BO 

F9 

0AA9:4 9 

02 

29 

02 

85 

BO 

4C 

69 

19 

0AB1: OC 

C9 

56 

DO 

OF 

A5 

9B 

49 

A5 

0AB9:18 

85 

9B 

A5 

9C 

49 

OC 

85 

BO 

0AC1:9C 

4C 

20 

09 

C9 

57 

DO 

1C 

35 

0AC9:A5 

9E 

C9 

28 

FO 

OB 

A9 

28 

43 

0AD1:85 

9E 

A9 

00 

85 

B1 

4C 

AO 

B1 

0AD9:08 

A9 

09 

85 

9E 

A9 

OF 

85 

15 

0AE1:B1 

4C 

AO 

08 

C9 

48 

DO 

1C 

A3 

0AE9:A5 

9F 

C9 

C8 

FO 

OB 

A9 

C8 

4E 

0AF1:85 

9F 

A9 

00 

85 

B2 

4C 

AO 

16 

OAF 9:08 

A9 

40 

85 

9F 

A9 

44 

85 

8E 

OBOI:B2 

4C 

AO 

08 

C9 

58 

DO 

09 

72 

0B09:A5 

B5 

49 

02 

85 

B5 

4C 

EC 

31 

0B11:10 

C9 

59 

DO 

09 

A5 

B5 

49 

6D 

0B19:01 

85 

B5 

4C 

EC 

10 

C9 

43 

OB 


0B21:D0 

11 

A5 

A5 

49 

01 

85 A5 

FI 

0B29:A5 

AA 

FO 

13 

A9 

00 

85 

AA OF 

0B31:4C 

EC 

10 

C9 

5A 

DO 

OB A5 

19 

0B39:A9 

49 

01 

29 

01 

85 

A9 

4C E6 

0B41:20 

09 

C9 

51 

DO 

OB 

A5 A9 

9F 

0B49:49 

02 

29 

02 

85 

A9 

4C 

20 

55 

0B51:09 

C9 

46 

DO 

08 

A5 

B3 
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Sul 128 la divisione dello schermo avvie¬ 
ne grazie ad una routine incorporata nella 
macchina, mentre l’utente di 64 deve 
svolgere l’operazione da solo, tramite un 
attento uso deH’interrupt IRQ. 

Il programma annesso all’articolo propo¬ 
ne un’esempio di questo tipo di routine 
per C64. L’argomento è stato trattato in 
maniera più dettagliata in COMPUTEl’s 
First Book of Commodore 64 (pubblicato 
nel 1983) ed in questa sede prenderemo in 
esame il funzionamento del programma 
incluso nel libro. 

Innanzitutto, spendiamo qualche parola 
per definire il nostro obiettivo. L’immagi¬ 
ne del televisore o del monitor viene 
continuamente ridisegnata dal raster, che 
corre sullo schermo dall’alto al basso ed 
impiega 1/60 di secondo per definire l’in¬ 
tera figura. Il nostro programma deve 
cogliere il 64 nel momento in cui il dise¬ 
gno dello schermo si trova esattamente sul 
punto di divisione stabilito, per passare ad 
una modalità differente (da testo ad alta 
risoluzione, da un colore di sfondo all’al¬ 
tro, e via di seguito). Tutto deve svolgersi 
molto velocemente, in modo che l’utente 
non avverta un tremolio nell’immagine. 
Ancora, dobbiamo fare in modo di ripor¬ 
tare il nostro video allo stato primitivo 
quando il disegno del raster giunge al 
termine dello schermo e ritorna d’accapo. 
Ciò richiederà due regolazioni d’inter- 
rupt: una per la prima commutazione e 
l’altra per il ripristinamento. 

Mentre avviene tutto ciò, è necessario 
controllare un secondo interrupt, il quale 
si occupa della tastiera, aggiorna l’orolo¬ 
gio e lampeggia il cursore. Anche questa 
routine deve controllarsi ad intervalli di 1/ 
60 di secondo, ma non necessariamente 
alla stessa velocità delfinterrupt video. 
Infatti la mancata sincronizzazione delle 
due attività costituisce parte del problema 
che dobbiamo risolvere. 

Ln problema di priorità 
Potremmo avvicinarci alla questione seri- 


Programmazione 


inl.m. 


Divisione dello schermo 

Jim Butterfield 


vendo così il programma: quando i due 
interrupt IRQ avvengono nello stesso 
momento, eseguiamo sempre la divisione 
di schermo per prima. E’ un’operazione 
molto delicata dal punto di vista dei tempi, 
mentre un piccolo ritardo non causerà 
gran danno a tastiera ed orologio. La divi¬ 
sione dello schermo avrà la precedenza, 
permettendoci il tempestivo intervento 
necessario, giusto? Sbagliato. 

Ecco qual’è il problema. Supponiamo che 
rinterrupt regolare (riguardante tastiera/ 
orologio) preceda di una frazione di se¬ 
condo il segnale del chip video. Il compu¬ 
ter inizierà ad occuparsi della tastiera, non 
permettendoci di controllare l’interrupt 
seguente fino al termine di quest’ultimo. 
Controllare la tastiera, aggiornare l’orolo¬ 
gio e sbrigare altri compiti (lampeggiare il 
cursore, controllare il tasto RUN/STOP e 
mentenere la sincronizzazione delle cas¬ 
sette) richiederà troppo tempo: avremo 
perso il punto di divisione e l’osservatore 
vedrà un salto o tremolio, sulla linea di 
divisione. 

Dobbiamo adottare un diverso approccio, 
che da principio apparirà radicale: scon¬ 
nettiamo completamente rinterrupt rego¬ 
lare, l’unico interrupt sarà quello per la 
divisione di schermo. Il codice domande¬ 
rà, “la routine regolare richiede qualche 
operazione?” Se la risposta sarà afferma¬ 
tiva allora la routine verrà sbrigata dopo la 
divisione dello schermo. 

Come possiamo individuare una richiesta 
d’interrupt se abbiamo chiuso rinterrupt 
stesso? La ri sposta giace all ’ interno di due 
registri molto importanti: lo IER (Inter- 
rupt Enable Register) in $D019, che passa 


una richiesta d’interrupt attraverso la li¬ 
nea IRQ quando questa è attivata, e l’IFR 
(Interrupt Flag Register) in $DC0D, che 
ci dice se un interrupt viene richiesto da un 
avvenimento particolare, persino se rin¬ 
terrupt non viene “passato”. 

Il linguaggio macchina 
La nostra routine si limita semplicemente 
a cambiare un colore di sfondo sul punto 
di divisione. Nel momento in cui la routi¬ 
ne sarà attivata, il BASIC avrà già spento 
la linea d’interrupt regolare. 


033C 

033E 

0341 

0343 

0345 

0348 


034A 

034C 

034E 

0351 


LDA #$01 ;spegne 
interrupt raster,.. 

STA $D019 ;...via IER 

LDX #$92 /raster int = 
$92 

LDY #$06 /colore blu 
LDA $D012 /controllo 
raster 

BPL $034E /se al 
principo dello schermo, 
salta 

LDX #$01 /raster int = 
$01 

LDY #$00 /colore nere 

STX $D012 /regola IRC 

successivo 

STY $D021 /cambia 

colore 


Il codice soprastante si occupa della divi¬ 
sione di schermo vera e propria. Ora è 
tempo di vedere se l’interrupt disabilitato 
richiede qualche intervento. 

0354 LDA $DC0D /controlla 
IER 

0357 AND #$01 /estrae bit di 
timer 

0359 BEQ $035E /salta se non 
v'è richiesta 

035B JMP $EA51 /presta ser 
vizio di timer 
035E JMP $FEBC /esce da 
interrupt 
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Il codice è stato strutturato nella maniera 
più schietta possibile, ma in molti casi 
dovrete espanderlo. Per esempio, si po¬ 
trebbe avere bisogno di regolare (e verifi¬ 
care) entrambe le parti del registro raster, 
alta e bassa. Nell’articolo originale non 
veniva rivelato un segreto, e cioè che il 
codice di inizializzazione IRQ nella 
ROM, insieme a quello soprastante, gira¬ 
no in un tempo che quasi collima con il 
tempo impiegato dal raster per disegnare 
una linea. Ne deriva che il mutamento di 
colore avviene una linea sotto a quella 
specificata. 

Scriviamo il programma in BASIC così 
da poter vedere l’intera operazione. 


90 POKE 53265,27:REM 
REGOLAZIONI DI 
DEFAULT 

100 FOR J=828 TO 864: 

READ X1120T=T+ 

XrPOKE J,X 
120 NEXT J 

130 IF TO4077 THEN STOP 
200 DATA 169,1,141,25,208, 
162,146,160,6,173,18, 
208,16,4,162,1 
210 DATA 160,0,142,18, 

208,140,33,208,173, 
13,220 

220 DATA 41,1,240,2,76,49, 
234,76,188,254 


300 POKE 56333,127:REM 
SCONNETTE IRQ 
REGOLARE 

310 POKE 788,60:POKE 
789,3 

320 POKE 53274,129:REM 
CONNETTE RASTER IRQ 

Per gestire gli interrupt bisogna avere 
nuove idee, e porre molta attenzione all’e¬ 
secuzione vera e propria. 11 debug del co¬ 
dice d’interrupt è un’operazione difficile, 
quindi è consigliabile sforzarsi di far bene 
la prima volta. 

© Compute Publications. Tutti i diritti sono riservati. 
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Divagazioni 


Per quasi 50 anni abbiamo considerato il 
computer come uno strumento per l’ela¬ 
borazione di dati. E' giunto il momento di 
mettere da parte questa concezione anti¬ 
quata per sostituirla con una nuova idea 
che ci condurrà nel ventunesimo secolo. 

Mezzi di teletrasporto 
Non dimenticheremo mai la celebre frase 
“Portami su. Scotty!” dell’ormai storico 
Star Trek, soggetto di telefilm e pellicole 
cinematografiche. 

Che meraviglia poter teletrasportarsi in 
giro per il mondo! I viaggi sarebbero 
istantanei, poco costosi e privi di fastidi. Il 
raggio trasportatore dell’astronave Enter¬ 
prise non è più un mero prodotto della 
fantascienza. E’ realtà. Non saremo in 
grado di teletrasportare corpi umani, ma 
riusciamo a inviare enormi campi di infor¬ 
mazioni; il risultato è il medesimo: il 
viaggio dell’uomo da una città all'altra, 
tra continenti, e pianeti. Benvenuti nel 
mondo della realtà virtuale, nel quale gli 
uomini possono trasportare a distanza la 
loro presenza con l’aiuto di un computer. 
Una presenza teletrasportata, o telepre¬ 
senza, è già tanto comune da essere quasi 
invisibile. 

Qualche minuto fa, per esempio, appena 
mi sono svegliato ho teletrasportato nella 
mia cucina Bryant Gumbel e Deborah 
Norville, mentre preparavo del caffè e 
riscaldavo il biberon per la mia bambina. 
In questo momento, sono seduto nel mio 
studio dove ho treletrasportato Daniel 
Ortega dal Nicaragua al Michigan. Men¬ 
tre scrivo questa pagina, Ortega si trova in 
Nicaragua, a 10000 miglia di distanza, e 
discute il futuro del partito sandinista 
dopo le recenti elezioni. 

Ortega, Gumbel e Norville non sono fisi¬ 
camente nel mio appartamento, ma ciò 
non ha alcuna importanza. In un mondo 
virtuale ciò che conta è l’effetto. Se presto 
la mia attenzione a questi personaggi più 
che a mia moglie Janet, affaccendata per 
giungere a tempo in ufficio, chi tra loro è 


Le autostrade del futuro 

Fred D'Ignazio 


più reale? Chi di loro si trova realmente 
qui, accanto a me? 

Non si perde infatti ogni cognizione del 
luogo in cui ci si trova? 

Strade a più corsie 

Nel giro dei prossimi cinque anni i perso¬ 
nal computer si sposeranno con video, 
TV, compact disc e telefoni: ne risulterà la 
realtà virtuale a più vie. Oggi sono nella 
possibilità di trasportare in casa il trio di 
Gambel, Norville e Ortega, ma non posso 
inviare loro la mia persona. Il viaggio è 
unilaterale, ma non per molto ancora. 
Pensate alle conversazioni che avvengo¬ 
no tra giornalisti della TV e personaggi 
famosi sparsi per il mondo. 

Una persona può trovarsi in Colombia, 
un’altra in Giappone, una terza a Was¬ 
hington ed una quarta a New York. Noi, 
attraverso la finestra del televisore, pos¬ 
siamo vederli tutti nello stesso momento, 
ed il giornalista conversa con loro come si 
trovassero tutti nella stessa stanza. Ciò 
che osserviamo è una realtà virtuale a più 
vie. Ciascun partecipante viene trasporta¬ 
to dai suoi compagni. Molto presto questo 
procedimento sarà accessibile alla gente 
comune. Si stanno installando nuove li¬ 
nee a fibre ottiche che spediscono voci, 
immagini, musica e dati sull’intero piane¬ 
ta. Nel frattempo, si fabbricano nuovi 
microchips che comprimono l’informa¬ 
zione e se possibile ne accelerano mag¬ 
giormente la trasmissione. 

Come risultato, apprezzabile nel giro di 
un lustro, vedremo calcolatori multime¬ 
diali che percorrono autostrade ottiche e 
mutano la realtà virtuale in un’esperienza 


condivisibile da tutti noi. 

Bryant non è in casa 

Non credo che Bryant Gumbel gradirebbe 
una nostra visita. Ma a molte altre persone 
potrebbe far piacere. Il mondo che visite¬ 
remo non sarà banale come un notiziario 
o l’alloggio di un individuo. Al contrario, 
si tratterà di un mondo di trasmissioni 
contemporanee dove guarderemo attra¬ 
verso varie finestre nello stesso momento: 
alcune si apriranno sul mondo di tutti i 
giorni, altre saranno spalancate su diversi 
mondi di dati. 

I servizi del futuro somiglieranno molto 
piu ad MTV che a CNN (reti televisive 
americane specializzate nella trasmissio¬ 
ne via cavo per 24 ore su 24 di videoclip 
musicali nel primo caso, e di notiziari nel 
secondo). I cronisti di tutto il mondo 
depositeranno le informazioni riguardanti 
gli avvenimenti (di importanza intema¬ 
zionale, di interesse sociale, ecc.) in un’e¬ 
norme banca dati multimediale, cui ognu¬ 
no di noi potrà accedere dalla propria 
abitazione, attraverso un computer multi¬ 
mediale. Chi lo desidera, potrà richiamare 
un accadimento, riempire con esso l’inte¬ 
ro schermo, e seguirlo fino alla conclusio¬ 
ne. 

Ma per la maggior parte della popolazio¬ 
ne mondiale, ciò sarà semplicemente 
noioso. 

Piuttosto, ci divertiremo passando da un 
canale multimediale all’altro. Richiame¬ 
remo simultaneamente diverse finestre 
sullo schermo, oppure su schermi piatti 
applicati alle pareti come videocarta da 
parati. Potremo usare quattro schermi 
(raggruppati in un superschermo) per 
proiettare la narrazione principale: una 
dimostrazione studentesca a Beijing, il 
matrimonio di due rockstar, il risultato di 
una partita di calcio. Nel frattempo, potre¬ 
mo avviare il commento del cronista su un 
quinto schermo. Su un sesto schermo 
inseriamo come in un mosaico la nostra 
migliore amica che potrà osservare il 
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La pagina del 
programmatore 

Spooler di stampa 

Randy Thompson 


videoclip in lavorazione. Su uno schermo 
separato consultiamo il Guinness dei Pri¬ 
mati e su un altro ancora, qualche vecchio 
documentario. 

Potremo controllare le riprese di tutto ciò 
che vediamo per mezzo di una videoca¬ 
mera. avvicinandoci ed allontanandoci 
con zoom, grandangolari, e primissimi 
piani. Avremo un controllo di audio ed 
immagine fotogramma per fotogramma. 
L'immagine verrà fermata, stampata nel¬ 
le dimensioni di un poster, ripetuta velo¬ 
cemente, ridotta o allungata. Si potrà 
accelerare orallentare il sonoro, traducen¬ 
dolo in francese, giapponese, o russo. 

Ma questo non è che l'inizio. Tutto ciò 
può registrarsi su dischi ottici per future 
fruizioni e per composizioni personali. 
Oppure possiamo usare le informazioni 
come dati di partenza per realizzare una 
simulazione computerizzata tridimensio¬ 
nale di una gara sportiva, una sommossa, 
od una festa di compleanno. 

Questo tipo di simulazione rappresenta un 
livello avanzato di realtà virtuale nel 
quale è possibile entrare ed invitare amici 
ad entrare con noi: il luogo in cui incontre¬ 
remo queste persone potrà essere reale o 
virtuale, quale sarebbe una stanza riempi¬ 
ta di oggetti ed individui sparsi per il 
pianeta. 

Estensione del tatto 
Possiamo pensare a tutti i canali di comu¬ 
nicazione del pianeta, ottici ed elettronici, 
come a delle strade: autostrade elettroni¬ 
che del ventunesimo secolo. 

Da che cosa saranno percorse queste stra¬ 
de? Dalle nostre bocche, occhi, orecchie - 
e dalla nostra immaginazione: quali tele¬ 
presenze virtuali. Alcuni esperti asseri¬ 
scono che saremo persino capaci di invia¬ 
re i nostri nasi per odorare luoghi, fatti, 
pietanze, persone in ogni angolo della 
terra: e le nostre mani per toccare tessuti, 
sentire freddo, caldo, tastare morbido 
velluto e rocce appuntite. 

Ma cosa sentiremo? Elementi in parte 
naturali, in parte artificiali; in parte reali 
ed in parte simulati: in tempo reale e nel 
passato, nel futuro od in un mondo imma¬ 
ginario inventato da un singolo e disponi¬ 
bile ai più. 

© Compute PuMications. Tutti t diritti sono risenati. 


Nel mese di gennaio è stato indetto una 
specie di concorso centrato su un pro¬ 
gramma abbastanza singolare, in grado di 
leggere file di testo ASCII da disco e di 
inviarli alla stampante. 

Fin qui niente di speciale, ad eccezione 
del fatto che avviata la stampa, disk drive 
e stampante non devono essere collegati 
al computer. Infatti, se driver e stampan¬ 
te restano collegati tra loro è possibile 
sconnettere il computer dal drive e spe¬ 
gnerlo senza interrompere la stampa del 
file (o piuttosto approfittare del tempo 
disponibile adoperando il computer). 

Ma tutti i programmi bizzari hanno qual¬ 
che cavillo, ed il mio ne aveva molti. 
Principalmente non funziona con tutte le 
stampanti. Ed ecco quale sfida ho lancia¬ 
to: ho offerto 50S alla prima persona che 
riuscisse a far funzionare il programma 
con tutte le stampanti compatibili Com¬ 
modore e 75$ al primo che riuscisse, oltre 
a ciò, a farlo funzionare sia sul 64 che sul 
128 (la mia versione era limitata al 64). 
Mi spiace di non aver ancora ricevuto una 
proposta vincente: devo ancora superare 
la quota di quattro partecipanti. Un paio di 
persone hanno scritto affermando che l’i¬ 
dea di uno spooler di stampa in back¬ 
ground è ridicola, producendo listati di 
cicli FOR-NEXT verificati veri, che 
stampano singolarmente i caratteri da 
disco. Ma hanno perso la sfida. Ted 
Grondski del Pioneer Valley Computer 
Club di Springfield, nel Massachusetts, 
ha inteso esattamente cosa chiedevo e mi 
ha spedito tanti spooler di stampa da non 


sapere più che farmene. Sono tutti basati 
sul programma che avevo pubblicato, ma 
ne rappresentano una versione ampia¬ 
mente migliorata. Sfortunatamente i pro¬ 
grammi di Mr. Grondski mantengono la 
limitazione ad un certo numero di stam¬ 
panti ed interfacce propria del programma 
originale; quindi i suoi spooler non vinco¬ 
no la gara. Mr. Grondski è stato comunque 
premiato con 40$ da Compute Gazetteper 
il suo impegno. Il miglioramento più si¬ 
gnificativo apportato da Grondski allo 
spooler di stampa è la possibilità di farlo 
girare anche su 128. Ma non basta: è anche 
totalmente rilocabile; infatti, basta cam¬ 
biare il valore assegnato alla varabile A 
nella linea 120 per poter effettuare questa 
operazione. L'indirizzo iniziale deve cor¬ 
rispondere ad un numero divisibile per 
256. Dopo aver lanciato il programma, 
potete stampare i file di testo inoltrando il 
comando SYS 15872:”nome di file”, di¬ 
spositivo#, dove specificherete il nome 
del file sequenziale ASCII ed il numero 
del disk drive (solitamente 8 o 9). Se la 
vostra stampante è compatibile con il pro¬ 
gramma, sentirete il ronzio del drive e 
vedrete stamparsi il file richiesto; soprat¬ 
tutto, potrete usare il computer durante la 
stampa. 

Abbiamo riportato questo contatto tra la 
redazione di Compute Gazette e uno dei 
lettori americani, in quanto ci è sembrata 
una iniziativa interessante. Vedremo di 
instaurare qualcosa del genere anche qui 
da noi! 

© Compute PuMications. Tutti i diritti sono riservati. 
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a cura della Redazione 



NEWS, CURIOSITÀ' E NUOVI PRODOTTI 



Il Business Design Centre di Londra , sede dell’European Computer Trade Show. 


Supetommodore nominato 
sponsor uiiciale italiano 
aell'European Computer 
Leisure Awards 1991 

Supercommodore è stato nominato spon¬ 
sor ufficiale italiano del prestigioso Euro- 
pean Computer Leisure Awards 1991. 
Questo significa che sarà responsabile 
dellasceltadei giochi per Commodore 64/ 
128 più in voga in Italia e i vincitori 
verranno annunciati ufficialmente dome¬ 


nica 14 aprile. Collegato all’European 
Computer Trade Show, la cerimonia, stile 
premio Oscar, avverrà al The Hippodro- 
me. uno dei più famosi night club di 
Londra. 

Prima dell'evento, un giornalista di Su¬ 
percommodore raggiungerà i rappresen¬ 
tanti delle altre riviste europee leader nel 
settore per compiere la selezione finale. 
Queste includono: Tilt (Francia): Det Nye 
Computer (Danimarca): Microbitti (Fin¬ 
landia): Compupress (Grecia): Mega 
Odo e Micromania (Spagna): Dator 


Magazin (Svezia): Nieuws (Olanda); 
Database Interactive (Gran Bretagna). 
Sono state coinvolte per sponsorizzare 
alcuni premi speciali Compute! per gli 
Stati Uniti e Log-In per il Giappone. 
Tutte le pubblicazioni coinvolte contano 
globalmente circa 8 milioni di lettori. 

Il primo stage vedrà il team editoriale di 
Supercommodore nominare le entrate, in 
base a quanto accade in Italia, per un totale 
di 11 categorie di giochi che sono: 

• Miglior animazione 

• Miglior grafica 

• Miglior suono 

• Miglior gioco d'azione 

• Miglior adveture/gioco di ruolo 

• Miglior gioco di strategia 

• Gioco più originale 

• Miglior packaging 

• Software Publisher dell'anno 

• Computer Game dell’anno 

Una vasta rappresentativa italiana, sarà 
presente all'European Computer Trade 
Show '91 (che si terrà al Business Design 
Centre di Londra dal 14 al 16 aprile), 
prima fra tutti, la Leader Distributioni. 
Ancora una volta lo Show di aprile sarà la 
maggiore pedana di lancio per i nuovi 
giochi. Lo scorso anno ha visto la realiz¬ 
zazione di 100 nuovi titoli e quest'anno è 
previsto perlomeno altrettanto. Il tema 
dello Show 1991 sarà la multimedialità, 
con un salone dedicato agli ultimi sviluppi 
nel settore del divertimento in tutto il 
mondo. 

"Siamo molto contenti che Supercommo¬ 
dore abbia deciso di partecipare come 
sponsor ufficiale italiano per il suo settore 
di mercato a questo secondo Show annua¬ 
le", spiega Michael Meakin, capo della 
Blenheim Database Exhibitions e orga¬ 
nizzatore delle due premiazioni e dello 
Show. 

"Come principale rivista nel settore in 
Italia, la sua presenza aggiunge credibilità 
alla premiazione che è si è ormai inserita 
come definitivo Oscar nel settore dell’in¬ 
dustria del computer in Europa". 


20 


SUPER COMMODORE C64/128 




















creati da Gremlins Graphics: Bulldog, 
Cosmic Causeway, Future Knight. Jack 
thè Nipper II, Krackout, Monty in thè Run, 
North Star, Rebounder, The Thing Boun- 
ces Back, Trailblazer. La confezione vie¬ 
ne ditribuita sotto la nuova etichetta di 
giochi arcade Virgin Games propria dell? 
Virgin Mastertronic. 

Immagini a gogò 

Una marea di immagini per Commodore 
64 e 128 sono disponibili presso Quan- 
tumLink. La libreria di software di grafi¬ 
ca all’interno dell'area Commodore del 
Q-Link annovera oltre 6400 file, tra cui 
anche qualche animazione. Il software di 
pubblico dominio è realizzato per 64 o 
128 dotati di 64K di RAM video. 

Per localizzare l’area grafica della sud¬ 
detta rete, si accede a Computing Support 
Groups dalla Commodore Information 
Network richiamando la voce Graphics. 
Vi sono immagini in entrambe le sezioni 
64 e 128 delle librerie software. 

Per ulteriori informazioni riguardo i Jìle 
grafici Commodore del Q-Link, contatta¬ 
re il Pickfest Q-Link Graphics Support 
Group, 521 North Street NW, Warren, 
Ohio. 44483. 


• conversioni sono eseguite in linguaggio 

• macchina nel tempo di pochi secondi. Il 

• programma richiede 64K di RAM video. 





Presentazioni 
e polluzioni pofessionali 

I lettori interessati alla rapida realizzazio¬ 
ne di menu, display, immagini destinate a 
diventare sfondo di giochi, animazioni ed 
altro ancora possono servirsi di Screen- 
Pro (AccuTome Productions). 

II sistema per la produzione di schermi ed 
animazioni consta di due dischi, dei dri- 
vers, di una documentazione completa di 
schermi e sequenze animate dimostrativi. 


Contabilità elettronica 


Kit Commodore 

per impara/i, creare, giocare 

Da oggi l’offerta di prodotti Commodore 
destinata ai giovani e a quanti si avvicina¬ 
no per la prima volta al mondo del compu¬ 
ter è ancora più straordinaria. Un nuovo 
kit viene infatti a completare il pacchetto 
dei prodotti esistenti che da mesi sta ri¬ 
scuotendo molto successo. 

Il primo della serie è Kit C64 Skate. Si 
tratta di un kit composto da un computer 
Commodore 64, da un registratore 
( 1530), da un joystick, da uno skateboard 
(in tre colorazioni) e da due cassette gio¬ 
chi, delle quali una comprende il gioco 
Skate Or Die e l'altra una galleria di 50 
giochi differenti. Il kit C64 Skate si rivol¬ 
ge in particolare a un pubblico giovane ed 
già disponibile, mentre leggete, in tutti i 
punti vendita Commodore Point sparsi 
sul territorio nazionale. 

Continuano anche le promozioni per i due 
kit Commodore destinati agli utenti delle 
scuole medie superiori e a quei giovani 
che intendano utjjizzare il computer per 
creare giocando. 

Il Kit Scuola è ideale per gli studenti delle 
scuole medie e delle scuole superiori. 
Comprende 40 programmi didattici diffe¬ 
renti che consentono, attraverso il gioco, 
di studiare e imparare numerose materie: 
dalla matematica all 'algebra, alla geome¬ 
tria, alla geografia e tante altre materie ed 
inoltre alla logica e all’insiemistica, fon¬ 
damentali per l'apprendimento informa¬ 
tico. Il kit in questione è composto da un 
Personal Computer Commodore 64, da 
due programmi e da un registratore 1530. 

Mega raccolta Virgin 

E' prossima l’uscita di Mega-Pack, una 
raccolta di dieci giochi originali per 
Commodore 64 e 128 edita da Virgin 
Mastertronic. Ecco la lista dei dieci giochi 



Babilonia nell'Estremo Oriente 

Fresco fresco dalla terra del sole nascente 
arriva Curse of Babylon: arcade della 
Kyodai Software Marketing, spruzzato 
qua e là di tocchi role-playing che non 
implicano però la memorizzazione di 
complicate ambientazioni. Il mondo di 
Babilonia deve salvarsi da orde di orribili 
mostri come zombie, creature di roccia e 
giganti lucertole blu. Il gioco prevede 12 
livelli di difficoltà, ed oltre 150 stanze, da 
esplorare mentre sette diverse colonne 
sonore seguono l’azione che si svolge 
sullo schermo. Distributore: Borderbund 
Software. 

Convertitore grafico per 128 

Al nome di Ante Up risponde un conver¬ 
titore firmato Starfollower Production in 
grado di trasformare le immagini in 40 
colonne realizzate con GEOS, Koala, 
ComputerEyes, e PrintShop in un formato 
ad 80 colonne compatibile con BASIC 8. 
Sullo schermo stesso vi è un'opzione per 
modificare le dimensioni della cella per 
80 colonne e le funzioni BASIC 8 consen¬ 
tono di apportare cambiamenti a colori e 
dimensioni delle celle, come pure di ruo¬ 
tare ed invertire figure e pennelli. Tutte le 


L’etichetta californiana Computer Craft- 
ware ha messo a punto un programma per 
64 e 128 allo scopo di facilitare le opera¬ 
zioni di contabilità e controllo dei registri 
personali. Il software si serve di un siste¬ 
ma d’inserimento ad input singolo per 
registrare 17 differenti tipi di operazioni, 
quali pagamenti automatici, depositi, 
prelievi, trasferimenti elettronici, opera¬ 
zioni tramite carta di credito, interessi, 
addebiti mensili ed annuali, pagamenti 
del correntista alla banca, e modifiche al 
bilancio. 

Utilizzando la propria stampante si posso¬ 
no riportare su carta registri delle opera¬ 
zioni, accrediti, bilancio giornaliero, gra¬ 
fici del bilancio giornaliero, e bollettini 
dei prelievi effettuati. 

Con il programma Book viene fornito un 
pacchetto di Utilities compatibile con dri¬ 
ve 1581, il quale oltre a display di directo¬ 
ry, istruzioni DOS, headers, copia di file, 
ed utility di archivio, è dotato di funzioni 
atte a generare ed accedere a tante subdi¬ 
rectory di partizioni quante ne permette il 
disco. 

La confezione comprende ambedue le 
versioni del prodotto (per 64 e 128). L'uso 
della seconda nel modo 128 richiede un 
monitor RGB ad 80 colonne ed, equipag¬ 
giata di menu a pull-down, si serve della 
RAM supplementare propria del 128 e 
della velocità doppia del processore. 
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Mudfrog 

Math 

Silenzio! Il professor Mudfrog si appresta a tenere un'altra 
lezione di addizione e sottrazione sul 128. 


S ta per incominciare la lezio¬ 
ne di matematica o l’interval¬ 
lo per fare breakfast? Per il 
geniale professore graci¬ 
dante, non c'è differenza! 

Bzzz. Zip-CIOMP! Se negli afosi gior¬ 
ni estivi non fate rumore e tendete le 
orecchie, sentirete il professor Mud¬ 
frog mentre spiega matematica giù 
nel vecchio stagno. E quando i bam¬ 
bini si siedono di fronte a questo pic¬ 
colo ranocchio, si divertono tanto da 
non accorgersi di seguire una spiega¬ 
zione scolastica. Mudfrog Math è un 
modo simpatico per dimostrare sem¬ 
plici problemi di addizione e sottrazio¬ 
ne ai bambini in età prescolare. I 
ragazzini contano il numero di zanza¬ 
re sullo schermo e digitano la rispo¬ 
sta, allora il professore gracchia la 
sua conferma o disapprovazione. 

Preparazione 

Per agevolare il caricamento e l'uso 
del programma, lo abbiamo salvato 
sia su cassetta che su disco. Per 
giocare a Mudfrog Math, caricate il 
programma e digitate RUN. Dopo 
qualche istante, potrete effettuare 
delle scelte su un menu di cinque 
opzioni. La prima vi consentirà di al¬ 
ternare problemi di addizione e sottra¬ 
zione, con la seconda selezionerete 



solo problemi di addizione, con la ter¬ 
za soltanto problemi di sottrazione e 
con la quarta opterete per un'estrazio¬ 
ne casuale di entrambi i tipi di proble¬ 
ma. Per uscire dal programma, sele¬ 
zionate l’opzione 5. Effettuata la scel¬ 
ta, entrerete nell’aula galleggiante di 
Mudfrog. Troverete il professore se¬ 
duto sulla sua ninfea preferita, in atte¬ 
sa di qualche gustoso problema di 
matematica. Sulla destra vedrete una 
lavagna magica dove Mudfrog propo¬ 
ne le equazioni che desidera risolvia¬ 
te. 

L’ora del 
breakfast 

I problemi iniziano con un numero che 
lampeggia sullo schermo. Nello stes¬ 
so tempo, un equivalente numero di 
zanzare prende posizione. Ora a 
seconda dell'opzione scelta, sulla 


lavagna appare il segno meno o più. 
Poi è la volta del numero da addizio¬ 
nare o sottrarre al primo. Se si tratta di 
un problema d’addizione, vediamo il 
numero di zanzare da aggiungere che 
si unisce al gruppo. Se è un problema 
di sottrazione, Mudfrog apre la bocca 
ed inghiotte il numero di insetti da 
sottrarre. Quando vedete lampeggia¬ 
re il punto interrogativo contate le 
zanzare svolazzanti ed utilizzate il 
tastierino numerico per inserire il 
numero contato. Mudfrog attende con 
pazienza che i bambini risolvano il 
problema. Se la risposta digitata è 
sbagliata, il professore gracida in 
modo significativo e permette di tenta¬ 
re ancora. Quando la risposta è cor¬ 
retta, Mudfrog gracchia allegramente 
per tre volte. Dopo aver risolto dieci 
problemi matematici, il programma 
ritorna allo schermo opzioni. E’ possi¬ 
bile scegliere un'altra serie di proble¬ 
mi o chiudere la sessione con l’opzio¬ 
ne 5. 

Zip-CIOMP! Zip-CIOMP! Certamente 
Mudfrog si diverte ad insegnare mate¬ 
matica nello stagno. I bambini non 
apprezzeranno mai la sua cucina, ma 
il suo affascinante metodo d’insegna¬ 
mento non può far altro che stimolare 
il loro appetito di conoscenza. 

© Compute Publicutions Tulli i diritti sono risentiti. 
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■nnTTVSfjn Abbonarsi alle riviste 
UilUUSmi Jackson offre i seguen¬ 
ti vantaggi: ■ sconto del 20% sul prezzo di j 
copertina ■ prezzo bloccato per tutta la 
durata dell'abbonamento ■ diritto a ricevere fl ^l| 
Jackson Card 1991 che le garantisce: 

•sconti particolari presso American Contourella MM 
British School, Coeco, Galtrucco, GBC, _ 

Hertz, Misco, Sai, Salmoiraghi- 
Viganò, Singer • sconto del 10% 
sui libri Jackson acquistati presso le librerie Tjfan ^ 
convenzionate, per corrispondenza diretto- 
mente dall'editore e presso gli stand Jackson in tutte le 
fiere specializzate • invio del primo numero della rivista 
^Preview Magazine e 

del Catalogo Libri Jackson» 

LulaA rii l 


I gliate su questo servizio sulle nostre riviste. 
■ partecipazione a un concorso con: 1° 
premio: cavallo Mustang (o altro caval- 
, ^ ; lo di allevamento italiano) oppure moto YA- 
W0* 1 MAHA XV 535. - 2° premio: viaggio e 
soggiorno di nove giorni per due persone alle 
Maldive - 3° premio: viaggio e soggiorno 
per due persone di nove giorni ai Ca- 
p^oac raibi - 4° premio: viaggio e soggior- 

i——i * no per due persone di sette giorni 

ini rtprc in Ordegno. Viaggi e soggiorni 
M sono offerti 

da Club Vacanze - 5° + 

29° premio: computer JtàjQì 


Tulip 386 SX hard 1 
disk 20 MegaByte. 

Per partecipare al concorso è sufficiente abbonarsi o 
rinnovare il proprio abbonamento almeno a una delle 
riviste Jackson. Legga /^gruppo editoriale 
le modalità sul retro. 19JACKSON 


'; ' %T K Jackson Card la abilita 
inoltre ad un'ora di colle- 
yS?—■ ^^gamento gratuito alla nuo¬ 
va rete telematica JacksOnLine. Informazioni detta- 


ackson 
y : ' A*® 
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ABBONARSI È FACILE 


MODALITÀ' Mia TARIFFE ABBONAMENTO JACKSON 1990-1991 

si alle riviste Jackson è riviste 

N./ANNO 

TARIFFE DI ABBONAMENTO 

veramente tacile. Legga bit 

11 

L. 61.600 anziché L 77M) 

attentamente sulla corto- ^ dazine 

11 

L. 61.600 anziché L 7J000 


11 

L 123.200 anziché L. 154.000 

Ima allegata a questa ri- informatica oggi 

11 

LJ^70.400 anziché L. >68.000 

vista le modalità di paga- trasmissioni dati e telecomunicazioni 

11 

L. 61.600 onziViè L. / 77.000 

mento e scelga quella cne computergrafica 

11 

L. 61.600 anziché L./ 77.000 

nrpfpriscp Non riimpnti- ELETTR0NICA 0GGI 

20 

L. 128.000 anziché L/ 160.000 

preTerisce. non aimenn AUT0MAZ | 0NE oggi 

k 20 

L. 112.000 anziché \ (. 140.000 

chi che, se e già abbona- strumentazione & misure oggi 

11 

L. 52.800 anziché \/L. 66.000 

to, riceverà a casa Pap- meccanica oggi 

11 

L. 61.600 anziché fi. 77.000 

nosito avviso di rinnovo watt 

20 

L. 32.000 anziché / y 40.000 

nnnnrp nntrn tplpfnnnrp STRUMENTI MUSICALI 

11 

L. 61.600 anziché/ LV 77.000 

oppure potrà telefonare fare elettronica 

12 

L. 67.200 anziché/ L.\ 84.000 

al numero 02/99043119 amiga aaagazine (disk) 

11 

L. 123.200 anziché L. \54.000 

nei giorni di martedì, super Commodore (disk) 

11 

L 110.000 anzic/è L. 1*7.500 

mercoledì e aiovedì dalle SUPER C0MM0D0RE (TAPE) 

[11 L. 74.800 anzurnè L. 91500 

mercoieai e gioveai aaue pc S0FTWARE 5 „ , /4 

11 

L. 105.600 anziché L. 132VJ00 

ore 1 4.3U alle^j^rj^ pc software 3 "’/z 

rn 

L. 132.000 anziché L. 165.000 

ore 17.30. videogiochi 

[fl 

L. 35.200 anziché L. 44.000 


REGOLAMENTO DEL CONCORSO 


1) Il Gruppo Editoriale Jackson promuove un concorso a premi in occasione dello Compagno 


impog 

Abbonamenti 1990/1991.2) Per partecipare è sufficiente sottoscrivere entro il 31 /3/l 991 
un abbonamento ad uno delle riviste Jackson. 3) Sono previsti 29 premi da sorteggiare fra tutti gli abbonati: 1 0 PREMIO a scelta un cavallo Mustang 
(o altro cavallo di pori valore di allevamento italiano) oppure una moto YAMAHA XV 535. 2° PREMIO viaggio e soggiorno di 8 giorni alle Maldive, 
per due persone, offerto da Villaggi Vacanze. 3 C PREMIO viaggio e soggiorno di 8 giorni ai Caraibi, per due persone, offerto da Villaggi Vacanze. 4° 
PREMIO viaggio e soggiorno ai 8 giorni in Sardegna, per due persone, offerto da Villaggi Vacanze. Dal 5° al 29° PREMIO un computer TULIP 
386 SX, Hard Disk 20 Megabyte offerti dalla Tulip Computer. 4) Ai fini dell'estrazione i nominativi degli abbonati a più riviste vengono inseriti una volta 
per ciascun abbonamento sottoscritto. 5) L'estrazione dei 29 premi avrò luogo presso lo sede del Gruppo Editoriale Jackson alla presenza di un funzionario 
dell'Intendenza di Finanza in dato 31/5/1991.6) A estrazione avvenuta l'elenco degli abbonati estratti sarà pubblicato su almeno 10 riviste edite da 
Jackson. Lo vincita sarò inoltre notificata agli interessati mediante invio di lettera raccomandata. 7) I premi saranno messi a disposizione degli aventi 
diritto entro 60 giorni dalla data dell'estrazione eccezion fatta per i premi secondo, terzo e quarto. I tre viaggi soggiorno dovranno essere effettuati 
compatibilmente con la disponibilità dello sponsor entro e non oltre il 31/12/91, con preavviso non inferiore a 25 giorni. 8) I dipendenti, familiari e 
collaboratori del Gruppo Editoriale Jackson sono esclusi dol concorso. 
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Ccptfrijlit J1085 
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Questo mese, non ci sono dubbi, 
i nostri lettori saranno entusiasti 
del supergame. Un gioco unico 
nel suo genere, sia per 
spettacolarità che per grafica. 

Il soft ci porta in un mondo affa¬ 
scinante e strano ed ha tutta una 
sua storia da narrare. Immaginate 
di essere dei valorosi cavalieri 
medioevali proiettati in una terra 
lontana nel futuro. Ora provate 


ad immaginarvi di esservi 
innamorati di una bellissima 
principessa che però ha un padre 
che non vi ritiene all'altezza e 
che, per scoraggiarvi, vi sottopo¬ 
ne a sette terribili prove per 
valutare se siete coraggiosi e 
resistenti... Questo è, a grandi 
linee, ciò che vi attende carican¬ 
do sul vostro C64 Taskmaster e il 
vostro obiettivo è, elementare 


Watson, superare (o almeno 
cercare di farlo) le sette prove 
perché Otto (il padre della princi 
pessa) vi conceda la sua mano. 

Il gioco 

Abbastanza anacrosticamcnte, 
l'unica arma della quale potrai 
usufruire, è una pistola laser che 
dovrai usare sempre a colpo 


SUPER COMMODORE C64/128 






' Bonus OO?0() High OGGOOO 



Score 002000 A A 


sicuro pena (se i colpi vanno a 
vuoto) la riduzione del bonus che 
viene assegnato una volta che si 
completa una prova. La prima 
schermata è ambientata nella 
Valley of thè Zombies, in una 
radura posta dietro al castello. 

Per poter superare questa prova 
dovrete aspettare il tramonto, 
poiché dovrete passare una notte 
intera nella radura con la sola 
compagnia dei morti viventi che 
vi inseguiranno senza tregua 
finché non vi avranno raggiunto. 
Non potete assolutamente evitar¬ 
li, quindi per difendervi da loro 
avete una sola possibilità: di¬ 
struggerli con un colpo di laser 
prima che vi raggiungano. Nel 
secondo scontro siete a thè 
Wizard of Dabbit Wood, una 
foresta incantata abitata da un 
mago crudele che vi lancerà 
contro i suoi incantesimi e che 
voi dovrete colpire insieme al 
mago per sopravvivere: attenti 
poiché il mago appare solo pochi 


secondi per volta, perciò è essen¬ 
ziale la massima velocità per 
terminare in poco tempo questa 
prova. La terza prova, 
thè Vampire Mountain, vi vede 
davanti all'ingresso di una 
tenebrosa caverna ai piedi di una 
montagna mistica. A questo 
punto dovrete raccogliere (è 
necessario solamente passarci 


sopra) gli strani idoli (delle 
statuette nere) che si trovano per 
terra. Facile no? Certo se fosse 
tutto qui quello che bisogna fare! 
State molto attenti, perché mentre 
raccogliete le statuette sarete 
disturbati da schiere di pipistrelli- 
vampiri liberati dal mago della 
foresta assetato di vendetta 
(cattiva compagnia per il livello 
della vostra emoglobina...)! 

Bene, a questo punto, siete già al 
quarto livello! Adesso arriva il 
bello! The Themple of Demon è 
la prova più difficile da superare. 
Infatti, vi troverete ad affrontare, 
in un sacro tempio famtasma, 
orde di sacerdoti pagani legati al 
luogo da un giuramento sovran¬ 
naturale che li rende particolar¬ 
mente agguerriti a qualunque 
visitatore... Anche loro, come 
voi, sono armati di pistola laser e 
perciò non vi resta che batterli 
sul tempo sparando per primi, in 
caso contrario non vivrete che lo 
spazio di tre vite (sempre che le 
abbiate mantenute tutte!). Nel 
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quinto livello, Ruins ef Tigorth, 
come facilmente intuibile, il 
luogo della battaglia è un'antica 
necropoli, guarda un po’ che caso 
strano, maledetta. 11 luogo è, 
infatti, sotto l'influsso della 
maledizione di uno stregone che 
ha popolato la città di spiriti 
sanguinari che dovrete ovvia¬ 
mente abbattere uno ad uno. 
Finalmente ci avviciniamo al 
traguardo: la sesta prova. The 
Northern Barbarians, vi porterà 
(perlomeno con l'immaginazio¬ 
ne) nel vecchio Far West, per 
misurarvi con zombie-cowboys 
che hanno scambiato il vostro 
corpo per un bersaglio e vi 
sparano addosso senza pietà: 
ricordatevi che, oltre a sparare, 
dovrete raccogliere i piccoli 
teschi sparsi sul terreno. Se siete 
arrivati a questo punto potrete 
dire di aver compiuto una grande 
impresa, quindi a voi il piacere di 
scoprire il settimo e conclusivo 
scontro in The Castle of Bird: 
solo qui vi renderete conto se 
meritate la mano di Kelly. Come 
fare? Scopritelo da soli, altrimen¬ 
ti che gusto c'è? Una sola racco¬ 
mandazione: mettetecela tutta ne 
va del vostro onore!!! 


I COMANDI 

Non è previsto l'uso della tastie¬ 
ra ma dovrete inserire il joystick 
in porta 2. Potete in tal modo 
muovervi nelle quattro direzioni 
ed anche diagonalmente. RE- 
STORE vi permette di abbando¬ 
nare la partita in corso, mentre 
per iniziare basta premere il fire 
del joystick. 
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N on so cosa mi sia preso per lan¬ 
ciarmi in questa lotta contro questo 
drago della malora. Sarà che da 
bambino mi ha sempre colpito l'imma¬ 
gine di San Giorgio che sconfigge il 
terribile drago con la sua spada... non 
esiste un’altra spiegazione per la mia 
incoscienza. 

E poi, che ci volete fare, la leggenda 
è un fardello pesante... e in questo 
game è il drago ad essere santo, io 
non sono che un povero Giorgio sen¬ 
za difesa... Cavaliere solitario mezza- 
macchina e mezzo-drago, combatte¬ 
te contro gli incorreggibili Cyborg che 
vogliono conquistare la galassia. 
L’impresa richiede buoni riflessi e 
sangue freddo a tutta prova. Un solo 
termine rende giustizia a questo 
game: infernale. Allora, che fare? 
Giocare, miei buoni amici, esploden¬ 
do con un ingresso temerario in un’a¬ 
zione vorticosa, poiché è bella l’inge¬ 
nuità! Copia pressoché conforme alla 
versione arcade marcata Jaleco, 
Saint Dragon vi farà precipitare nel 
suo universo popolato di strane crea¬ 
ture dall'aspetto infido. Chi avrebbe 



mai creduto che un toro, per giunta 
metallico, (mostro che trovate alla fine 
del primo livello) potesse decollare e 
scaricare una raffica di laser addosso 
al nostro aspirante toreador? 
Nessuno... ma, tutto questo, è certa¬ 
mente possibile, basta farsi prendere 
dal turbinio creativo di certi giochi... 

Inoltre, non pensate di finire rapida¬ 
mente con lui (ma anche con gli altri 
mostri che trovate progredendo alla 
fine di ogni livello), spesso sembrano 
morti ma sono solamente in attesa di 
trasformarsi per continuare la lotta. 
Dovete esplorare quattro livelli diver¬ 
si: il primo vi porta in un ambiente 
arido e sassoso: il secondo vi vede in 
un giungla dove la vegetazione è viva 
ed ha decisamente voglia di farsi uno 
spuntino quando vi vede apparire; nel 
terzo livello vagate aH’interno di una 
struttura futurista abitata da robot 
francamente poco raccomandabili e, 
infine, il quarto vi trasporta nello spa¬ 
zio infinito dove il nostro lanciatore di 
fiamme dovrà difendersi sullo sfondo 
delle nebulose. 

So già cosa state pensando: quattro 
livelli sono un po' pochi! E’ vero se 
comparato a certi giochi, in cui il solo 
pregio è quello di avere 10000 (esa¬ 
gerato...) schermate, Saint Dragon 
sembra un po’ misero... rassicuratevi, 
poiché la progressione della difficoltà 
di questo game, non vi potrà assoluta- 
mente deludere; gli alieni (bisogna 
pur dargli un nome a queste assata- 
nate bestie!) pullulano letteralmen¬ 
te e non di rado le vostre armi, per 
quanto impressionanti siano (po¬ 
trete otterne diverse raccogliendo 
delle icone), non sono sufficienti a 
farvi progredire poiché, gli aggres¬ 
sori sono talmente numerosi, che 
non si sa più a quale santo (Dra¬ 
gon!) rivolgersi. 

Questa difficoltà così elevata potrà 
dispiacere ai novellini che dovran¬ 
no sudare sangue prima di portare 
a termine il game, mentre per quan¬ 
to riguarda grafica e animazione 
niente da ridire... è tutto ok! 
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E difficile ormai entusiasmarsi da¬ 
vanti al miliardesimo shoot'em-up, 
eppure oggi è la seconda volta che mi 
trovo davanti un game di fattura ecce¬ 
zionale. Anche Retrograde, come 
Saint Dragon, mi ha entusiasmato, 
cosa che non credevo più di poter 
provare davanti a un soft di questo 
genere. Riflettendo meglio, devo però 
ammettere che Thalamus è uno dei 
migliori specialisti di shoot’em-up per 
C64 e, anche se questa volta gli effetti 
grafici sono meno riusciti, l’interesse 
del gioco è di alto livello. L’alternanza 
delle sequenze in scrolling verticale e 
orizzontale è piacevole e i mostri di 
fine livello sono superbi. 

Ma vediamo in concreto quale missio¬ 
ne ci viene proposta! Degli alieni 
aggressivi (e quando mai non lo 
sono?) hanno invaso sette pianeti del 
nostro sistema solare e, naturalmen¬ 
te, l'obiettivo della vostra missione è 
uello di farli velocemente sloggiare... 
’ importante abbattere il maggior 
numero di alieni possibile; infatti, in 
misura del numero dei nemici abbat¬ 
tuti, dipende la quantità di denaro che 
vi viene assegnata. Più guadagnate, 
più armi potete acquistare oltre al di¬ 
spositivo che vi permette di accedere 
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alla base sotterranea nemica. A que¬ 
sto punto, una volta ucciso il capo 
alieno, potrete passare al pianeta 
successivo e questo per ben sette 
volte, perlomeno è quanto deve suc¬ 
cedere, riuscire a farlo è un altro di¬ 
scorso. Non si può concludere la re¬ 
censione di questo shoot’em-up che 
con una sola ma esplicita parola: 
appassionante! 


Time 

Machine 


accompagnato da oggetti o creature 
viventi che avrà scelto. In ogni era 
temporale dovrete portare a buon 
termine una precisa azione al fine di 
aprire l'accesso al periodo successi¬ 
vo. Il problema si aggrava quando le 
andate e ritorno tra le cinque epoche 
presenti nel game diventeranno in¬ 
cessanti! 

Vi ritroverete presto catapultati senza 
via d’uscita in questa storia (a volte più 
complessa di quella di Back to thè 
Future) nella quale dovrete incessan¬ 
temente fare giochi di destrezza con il 
tempo e lo spazio per ristabilire il 
normale corso della storia. Ecco un’i¬ 
dea veramente originale che fa di 
Time Machine un soft che evade un 
po’ dall’ordinario... 


P er cominciare dobbiamo porre ri¬ 
medio ad un’ingiustizia commessa a 
proposito di Time Machine... Quando 
è stata presentata come preview, il 
nostro corrispondente inglese (più 
spietato della cara Maggie) non lo 
aveva valutato per il suo giusto valore. 
Era stato un po’ troppo severo (che 
abbia preso contatto con la Lady di 
ferro?)... 

In effetti, questo soft meritava molto di 
più! Abitudinariamente gli scenari 
complessi servono solo in funzione 
dell’estetica e influiscono raramente 
sul gioco stesso. Time Machine è riu¬ 


scito nell'impresa di proporre un tipo 
di azione che coincide perfettamente 
con un intrigo che sarete voi stessi a 
creare nel corso dell’avventura. Incar¬ 
nerete l’inventore di una macchina del 
tempo che, a seguito di un’incidente, 
si ritrova proiettato nella preistoria e 
dovrete personalmente influire sull’e¬ 
voluzione per poter fare ritorno al futu¬ 
ro. Il nostro scienziato ha a disposizio¬ 
ne un Zapper che gli permette di ad¬ 
dormentare o uccidere gli abitanti che 
incontra ad ogni falla temporale e di 
uattro teletrasportatori di cui potrà 
isporre a piacere in luoghi e circo¬ 
stanze diverse in modo da spostarsi 


»- 


m 


Dragons 

ofFlame 


D ragons of Flame, seguito del cele¬ 
berrimo Heroes of thè Lance, vi pro¬ 
pone un arcade/ad venture ambienta¬ 
to nell’atmosfera molto particolare di 
un game che non ha bisogno di pre¬ 
sentazioni: Advanced Dungeons & 
Dragons. Gli effetti grafici utilizzano 
completamente le possibilità offer¬ 
te da un 8 bit. Che lascia un po' a 
desiderare è la traduzione: anoni¬ 
ma! Non sono impazzito, visto e 
considerato che sia il soft che il 
libretto rimangono nella lingua di 
Shakespeare, vale a dire inesisten¬ 
te! Regna sovrana un'ambientazio- 
ne di gioco un po' infantile: ad ogni 
curva del labirinto nel quale si spo¬ 
sta il personaggio non si incontrano 
che fantasmini praticamente inno¬ 
cui che passano il loro tempo a rac¬ 
contare frottole... Morirete si... ma 
dal ridere, se restate troppo tempo 
in loro compagnia! Per finire, per 
partecipare all'animazione, alcuni 
gai buontemponi diretti dalla vostra 
abilità tramite il joystick, inscene¬ 
ranno uno spettacolo da music-hall 
farcito di sortilegi e magie. Insom- 
ma, un soft simpatico che piacerà a 
tutti, ma sopratutto a coloro che 
avranno la forza di apprezzarlo... 
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W hisky a fiumi, sventagliate di mi¬ 
tra, gangster che devi abbattere spa¬ 
rando dai tetti e i sicari del noto Al Ca¬ 
pone, sono gli ingredienti che ti movi¬ 
menteranno la serata: non mi sbaglio, 
il tuo dito sta già fremendo impaziente 
sulla fedele colt. Dopo Robocop e 
Batman, ecco che Ocean ci riprova 
proponendo la conversione di The 
Untouchables (gli Intoccabili), ispirato 
all’omonimo film da cui trae fedelmen¬ 
te lo spirito e ne riprende le grandi 
scene. Eliot Ness con i suoi accoliti 

3 ia, con il tuo aiuto, una lotta 
3 contro gli uomini di Al Capone 
a partire dal primo livello, che si pre¬ 
senta sotto forma di piattaforme a 
scrolling multidirezionale, nel quale 
devi scoprire delle prove tali da inchio¬ 
dare il padrino di Chicago. Armato di 
mitra, affronti gli uomini di Al in un 
deposito che devi ispezionare saltan¬ 
do su delle casse per reperire il corpo 
del reato evitando, nel contempo, i tiri 
dei gangster che cercano di impedir¬ 
telo. I due livelli seguenti sono degli 
shoot’em-up nei quali, in un vicolo, 
devi abbattere i malviventi appostati 
dietro le finestre delle case e stare 
attento alle auto che ti lanciano can¬ 
delotti di dinamite (gasp!!! mica noc¬ 
cioline...). Un consiglio per vivere più 
a lungo: sparate due colpi con il fucile 
e poi riparatevi dietro a un muro per 
ricaricare. Questa è la scena, tra 
quelle rappresentate, più realistica. Il 
livello successivo è ambientato nella 
stazione ed è anche la scena più cele¬ 
bre del film. Scendi le immense scale 
abbattendo i gangster che tentano di 



impedirti di avanzare, ma ricordati di 
proteggere il bambino che si trova 
nella sua carrozzina nel bel mezzo 
della sparatoria; non vorrai essere 
responsabile di infanticidio, spero! La 
scena è vista da sopra ed è molto ben 
disegnata, in seguito hai solo dieci 
secondi per uccidere l’ultimo gang¬ 
ster. Il sesto livello è l’apoteosi, infatti, 
riprende l’ultima, suggestiva, scena 
del film che ti coinvolge in una a dir 
poco folle corsa sui tetti. Questo gioco 
di sparo è avvincente come pochi, 
tanto più se consideri che la realizza¬ 
zione è eccellente. Come sempre 
succede nella maggior parte dei soft 
targati Ocean, il livello di difficoltà è 
abbastanza elevato (caldamente rac¬ 
comandato ai super-allenati), ma è 
sempre possibile progredire, passo 
dopo passo, se ci si mette una briciola 
d’impegno... 
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E eco un game che non mancherà di 
affascinare gli appassionati di fanta¬ 



scienza abbinata ad avventura e mi¬ 
stero. Un buon cocktail per i posses¬ 
sori di C64/128. Second World è il 
primo game di strategia che presenta 
una musica fantastica e un raffinato 
gioco iniziale. Se credete di avere una 
naturale predisposizione per essere 
un geniale industriale o aspirate al 
successo in politica non abbiate 
dubbi: fa proprio per voi! 

Ambientato nel futuro, Second World, 
vi fa approdare in un nuovo pianeta 
scoperto nel 2011. Gli scienziati han¬ 
no appurato che le condizioni del 
nuovo pianeta sono identiche a quelle 
della terra e, perciò, hanno deciso di 
renderlo abitabile alleviando così le 
difficoltà del nostro pianeta ormai 
sfruttato fin nelle viscere più profonde. 
Tutto fila liscio, perlomeno fino al 
2030, momento in cui il pianeta diven¬ 
ta indipendente e decide di tagliare il 
cordone ombelicale (ovvero i contatti) 
prendendo da solo tutte le decisioni. 
Ed è proprio a questo punto che fini- 
(segue a pagina 37) 
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GUIDA ALL'INPUT 
DEI PROGRAMMI 


programmi in BASIC listati su SUPERCOM- 
MODORE contengono una particolare codifica dei 
caratteri di controllo (cursore, colore, reverse, ecce¬ 
tera) che permette di ottenere una maggiore leggibi¬ 
lità dei programmi. 

Generalmente, questi listati contengono alcuni ca¬ 
ratteri racchiusi tra parentesi graffe {} ; queste ultime, 
che non esistono sulla tastiera del computer, non 
devono essere digitate, ma hanno unicamente lo 
scopo di indicare che i caratteri da esse racchiusi 
sono dei caratteri di controllo. 

Ad esempio {GIU'} indica che occorre premere una 
volta il tasto di cursore verso il basso, {3 GIU'} 
indica che il tasto di cursore verso il basso dovrà 
essere premuto tre volte. 

Se tra le parentesi graffe è racchiuso un singolo 
carattere, quest’ultimo deve essere premuto insie¬ 
me al tasto CTRL (ad esempio, incontrando {A} si 


dovrà premere il tasto CTRL insieme al tasto A). 
Invece i caratteri racchiusi tra parentesi quadre e 
simboli di maggiore e minore [< >] devono essere 
premuti unitamente al tasto Commodore (nell'ango¬ 
lo inferiore sinistro della tastiera). 

Ad esempio, [<A> ] indica che deve essere premuto 
il tasto Commodore insieme al tasto A. 

Infine, alcuni caratteri racchiusi dalle parentesi graf¬ 
fe preceduti dalle lettere SH: ciò indica che il caratte¬ 
re seguente deve essere digitato tenendo premuto il 
tasto SHIFT. 

La tabella seguente riporta, per ogni carattere di 
controllo, la codifica utilizzata nei nostri listati. 

I listati in linguaggio macchina (totalmente numerici) 
non possono invece essere copiati direttamente con 
il computer, ma richiedono l'utilizzo dello speciale 
programma MLX, riportato, insieme alle istruzioni per 
il suo utilizzo, in altra parte della rivista. 
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(segue da pagina 32) 

sce la storia ed entri in gioco tu! Dele¬ 
gato dalla popolazione locale, prendi il 
comando e difendi il pianeta dagli at¬ 
tacchi nemici. Ti si aprono numerose 
prospettive: puoi migliorare il com¬ 
mercio, il bilancio finanziario del Nuo¬ 
vo Mondo e creare un vero governo. 
La banca locale ti offre la possbilità di 
fare buoni investimenti accrescendo il 
patrimonio con l'acquisto di azioni e 
terreni e, con l’aiutodei manager, 
scoprire altre potenze oppure conclu¬ 
dere trattati di pace con i nemici. A 
riprova che tutta la galassia è paese, 
anche qui, se i conti non tornano, puoi 
aumentare le tasse in caso di entrate 
insufficienti... ma stai attento, questo 
non succede nella realtà, se cerchi di 
approfittare della situazione, vieni 
subito abbattuto senza pietà (ma ci 
pensate quante teste cadrebbero se 
questo avvenisse nel nostro piane¬ 
ta?...)! Beh, non è tutto così perfetto: il 
game ti offre anche delle possibilità in 
cui non esistono limiti! Solo la tua 
fantasia decide che genere di vita ci 
sarà su Second World e anche coloro 
che non sono dei ragionieri, troveran¬ 
no in questo soft dei buoni elementi 
per divertirsi, inoltre, per completare il 
tutto, puoi anche salvare la partita in 
corso per riprenderla più avanti. 
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I I mio computer preferito non può 
proprio lamentarsi. Le conversioni 
degli ultimi tempi sono state, oltre che 



caratterizzate dalla qualità, anche 
molto varie spaziando in diversi gene¬ 
ri di gioco. U.N. Squadron vi propone 
di lottare contro gli intrighi e gli interes¬ 
si di organizzazioni internazionali. Ma 
vediamo insieme di cosa si tratta! 

Per molti anni i paesi del Middle East 
sono stati segnati da violente guerre 
civili e conflitti sanguinari. Ormai tutto 
da tutto il Mondo si alza a gran voce 
una sola richesta: basta spargimento 
di sangue! Ma non tutti sono daccor- 
do: c’è anche chi ha interesse a non 
far mutare la situazione. Non è difficile 
immaginare chi: un gruppo di perico¬ 
losi e corrotti venditori di armi che, per 
impedire che tutto ciò finisca, hanno 
unito le loro forze per sviluppare una 
nuova e rivoluzionaria arma, in grado 
di spargere il terrore su tutto il globo 
terrestre, scacciando ogni speranza 
di pace dal mondo intero. Ecco la 
nobile missione che vi attende, ormai 
siete l'unico ostacolo che può fermarli 
prima che riescano a portare a termi¬ 
ne il loro sinistro obiettivo! Fate parte 
di U.N. Squadron, una forza di pace 
multinazionale, e cercherete di impe¬ 
dire che ciò avvenga con l’ausilio di 
una squadriglia da guerra aerea. Ma 
riuscirete a salvare il mondo dalla 
distruzione totale? Avrete abbastan¬ 
za coraggio per buttarvi a testa bassa 
in questa difficile impresa...? 

Volare in questa difficile missione è 
come buttarsi tra le braccia del diavo¬ 
lo... ma non dubitiamo affatto delle 
vostra pronta adesione! 


• 

f m LJG 

m 


KickOff 

• 

EDITORE: 

REFLEX 

• 

GRAFICA: 

8 

• 

SUONO: 

8 

• 

AZIONE: 

9 


E ormai normale amministrazione 
anche in Italia vedere film famosi con¬ 
vertiti su micro ma, da quanto ci risul¬ 
ta, è la prima volta che nel nostro 
paese si ricorre a un giocatore di cal¬ 
cio per creare un soft. Un giocatore 
che non ha bisogno di presentazioni: 
Franco Baresi! C’è, dico, una sola 
persona da 6 a 90 anni che non ha mai 
sentito parlare di lui? lo non la cono- 
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sco e voi? Ma bando alle ciance e 
caliamoci nel game. Il programmatore 
è nientemenoché Dino Dini, brillante 
autore del pluripremiato Kick Off. 
ormai vera e propria pietra miliare per 
quanto riguarda la simulazione del 
nostro sport nazionale. 

Certo, obietteranno gli sportivi che c'è 
una bella differenza tra giocare in un 
campo e giocare seduti in poltrona! 
Non dategli retta: gli sportivi da came¬ 
ra come me sanno bene quanto stress 
e quanta fatica ci vuole per vincere 
una gara e trovare la giusta tattica! Ed 
essendo questo un completamento 
dello stranoto Kick Off non possiamo 
dubitare del fatto che ci regalerà delle 
belle e interessanti partite. Le due 
nuove opzioni, inoltre, sono significa¬ 
tive e consentono i tempi supplemen¬ 
tari e lo spareggio ai rigori in caso di 
ulteriore parità. 

Si tratta di una superba versione rea¬ 
lizzata su misura per il mercato italia¬ 
no ed il fatto che il giocatore che lo 
sponsorizza sia uno dei più amati e 
apprezzati campioni attuali ne è la 
conferma. Franco Baresi World Cup 
Kick Off è un'accurata simulazione del 
gioco del calcio con una ampia visione 
del terreno ed un totale movimento in 
ogni direzione del campo, rispettando 
in modo corretto le reali condizioni di 

S uesto sport. 

igni squadra può selezionare la tatti¬ 
ca più opportuna da seguire all’inizio 
del gioco ed i calciotori computerizzati 
possono ricevere il pallone, effettuare 
un passaggio, correre ed intercettare 
i tiri degli avversari usando tutta l'abi¬ 


lità di cui disponete. Potete prendere 
confidenza con la gestione dei vari tiri 
usando l’adeguata opzione che vi 
consente di apprendere le varie tatti¬ 
che senza essere ostacolati dagli 
avversari. I vari calci d'angolo (nove 
tipi diversi), passaggi, tackle scivolati 
e dribbling, possono essere provati 
fino a raggiungere la perfezione. Inol¬ 
tre, ogni giocatore dispone di una 
singolare combinazione di andatura, 
resistenza, precisione e attacco. 

Un calciatore di livello internazionale 
dispone di una grande precisione e 
progressione rispetto agli altri gioca¬ 
tori. La possibilità di selezionare il 
livello di una squadra indipendente¬ 
mente dall’altra, si aggiunge alle ca¬ 
ratteristiche del gioco. 

Vige sempre il limite dei falli; anche qui 
se l’arbitro si accorge che siete già 
stati ammoniti siete automaticamente 
espulsi. 

Non potrete, comunque, tornare al 
menu principale senza aver immesso 
correttamente tutti gli input, ad esem¬ 
pio tutte le otto partite; mentre potrete 
tornare al menu di appartenenza in 
qualsiasi momento per aggiornarvi 
sulle varie fasi della Coppa del Mondo 
e regolarvi di conseguenza. Mancano 
ancora parecchi anni prima di un 
nuovo campionato mondiale, intanto 
che ne dite di preparare la vostra 
Nazionale? 
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T utte le monoposto e i piloti del cam¬ 
pionato mondiale di Formula 1 1990 in 
una fantastica prospettiva soggettiva 
e tridimensionale: ecco lo sport più 
folgorante del pianeta pronto per il tuo 
C64. Quale occasione migliore per 
provare l’emozione di una vera gara 
sui circuiti più famosi? Sei già in pista? 
Bene! Sei incastrato nel tuo cruscotto 
digitale e i tempi dicono che hai la pole 
position, eppure sei un outsider e 
nessuno ti aveva mai sentito nomina¬ 
re prima. Il tuo team è fermamente 
convinto del successo grazie alle tue 



chances simulate, così ora sai che 
non puoi deluderli. Sarai capace di 
vincere questo bruciante premio inter¬ 
attivo? Le caratteristiche principali di 
questo soft di corsa in auto sono costi¬ 
tuite dal punto di vista soggettivo 
“occhi del pilota’’, dalla massima liber¬ 
tà data dall’ambientazione vettoriale 
3D, dal cambio a cinque marce e re¬ 
tromarcia. dai controlli digitali delle 
rotture e della velocità dall’interno 
della macchina. Eccezionale, non 
resisto più! Il semaforo segna rosso... 
accidenti ma quando arriva questo 
benedetto verde! Calma, bisogna 
avere il tempo di apprezzare un tale 
capolavoro, non pensate anche voi? 
Cominciate col notare il percorso, 
evviva! E’ proprio la copia del GP di 
Monza e ci sono anche tutti i piloti e le 
auto di Formula 1 con le loro vere 
caratteristiche a gareggiare con te sul 
percorso e, dulcis in fundo, i rumori 
assordanti delle monoposto FI sono 
registrati dal vero. Niente di più reali¬ 
stico dunque! Siete ancora seduti a 
leggere?! 


# Para 
Academy 


• 

EDITORE: 

ZEPPELIN G. 

• 

GRAFICA: 

8 

• 

SUONO: 

7 

• 

AZIONE: 

8 


V uoi mettere alla prova te stesso e il 
tuo coraggio lanciandoti con un para¬ 
cadute? Bene, se questo è ciò che de¬ 
sideri, ecco un soft che porta gli ap¬ 
passionati di paracadutismo ai limiti 
della resistenza e anche oltre... I pro¬ 
spetti delle promozioni vengono deci¬ 
si velocemente attraverso una serie di 
testi specificatamente sviluppati: nes- 
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sun errore ti è concesso, puoi solo 
essere perfetto altrimenti sei espulso 
dall'Accademia. Forza di volontà 
combinata alla capacità di resistenza 
e all'abilità nell'usare le armi sono solo 
alcuni dei requisiti che devi possede¬ 
re per guidare un’unità da combatti¬ 
mento. D'altra parte, è risaputo, che il 
motto dei parà è da sempre “pronti a 
tutto”! Para Academy ti propone tutto 
questo: sei pronto a superare a pieni 
voti le sei precise discipline che ren¬ 
deranno realtà il tuo sogno? Si! Bene, 
allora puoi arrivare al più alto grado 
possibile: Red Beret! 


# Hu neh back 
at t. Olympics 
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Q uesto divertente soft della Softwa¬ 
re Projects ti propone di aiutare Qua¬ 
simodo a conquistare il cuore di 
Esmeralda. Come? Niente di più pia¬ 
cevole e divertente: ottenere la meda¬ 
glia d’oro alle Olimpiadi per conquista¬ 
re l’ammirazione ed il rispetto della 


sua donna che, come risaputo, è una 
fan accanita dei campioni sportivi! 
Devi gareggiare in diverse competi¬ 
zioni, ognuna delle quali mette alla 
prova la tua prontezza di riflessi e 
agilità. In una lotta contro il tempo devi 
partecipare alla corsa dei 100 m sia 
piani che ad ostacoli, lanciare il giavel¬ 
lotto, il disco e il martello. E poi guarda 
un po' quanta grazia hai nel librarti in 
aria nel salto in lungo e nel salto in 
alto: un vero angioletto! Naturalmente 
il successo completo lo ottieni solo 
guadagnando la medaglia d'oro in 
ogni disciplina sportiva. Te la senti di 
spremere i tuoi muscoli e dar fondo a 
tutte le tue energie per i begli occhioni 
di Esmeralda? Allora non ci sono 
dubbi è proprio è il tuo gioco! 


# Spaghetti 
Western 
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F inalmente!E’giàdaunpo'ditempo 
che il nostro piatto nazionale non 
veniva reclamizzato e, come tutti 


sappiamo, la pubblicità è l'anima del 
commercio! Però, ripensandoci, non 
ho capito molto bene cosa c entrino gli 
spaghetti in questo game; ma forse 
sono solo un po' confuso e non riesco 
a vederli! Non, non si vedono proprio 
anche aguzzando la vista, comunque 
resta il fatto che abbiamo a che fare 
con un game veramente originale! In¬ 
fatti, non siamo in un pseudo-ristoran¬ 
te italiano (all'estero nascono come i 
funghi...) ma nel selvaggio west che 
brulica letteralmente, invece che di un 
appetitoso piatto di pastasciutta, di 
fuorilegge. In questi luoghi dove il 
giudice colt detta la sua legge, è molto 
difficile trovare bravi sceriffi, soprat¬ 
tutto perché sopravvivono poco tem¬ 
po; anzi, possiamo dire ore piuttosto 
che giorni prima di essere trasportati 
in una bara a Boot Hills con un proiet¬ 
tile nella schiena. Mentre la delin¬ 
quenza cresce rigogliosa, nascono 
anche i Bounty Hunters. Questi cac¬ 
ciatori di taglie mettono in gioco la loro 
vita per scovare i pericolosi fuorileg¬ 
ge. Non sorprenderà nessuno il fatto 
che questi veri e propri crimebusters 
non stessero troppo a guardare la 
dicitura sugli avvisi di taglia “dead or 
alive”, anzi hanno la strana tendenza 
a ignorare il “vivi”. Se ancora non l’hai 
capito tocca proprio a te impersonare 
il più noto tra i Bounty Hunbters! Nelle 
vesti di Clint Westband (?!!!) ti prepari 
a conquistare un bel malloppo inta¬ 
scando le taglie dei fuorilegge di cin¬ 
que città del selvaggio west. 
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S e vogliamo parlare di grafi¬ 
ca computerizzata, dob¬ 
biamo ammettere che 
niente è più seducente e 
gradevole delle animazioni a pieno 
schermo. Solitamente, le animazioni 
generate su Commodore 64 vengono 
realizzate programmando gli sprite, 
oggetti di dimensioni piuttosto ridotte 
rispetto aN'area totale dello schermo. 
L’alternativa offerta da Playfields è 
basata sulla modalità video dual-play- 
field propria di Amiga. Le animazioni 
di ampie aree dello schermo permes¬ 
se da questa utility sono possibili 
grazie all’uso di due playfield indipen¬ 
denti: il campo overlay ed il campo 
testo. Questi due strati si sovrappon¬ 
gono e scorrono dolcemente in dire¬ 
zioni diverse per dare vita ad effetti 
tridimensionali molto notevoli. I pan¬ 
nelli overlay scorrono davanti o dietro 
allo schermo di testo, e gli schermi 
possono contenere porzioni traspa¬ 
renti, così che quando il primo si 
muove sul secondo, ne lascia intrave¬ 
dere le caratteristiche. C’è dell’altro. Il 
modo overscan estende l’overlay al¬ 
l’area del bordo. Queste ed altre ca¬ 
ratteristiche extra vengono illustrate 
da un demo incluso al programma. 


Richard Penn 

Cercate qualcosa di 
nuovo per il vostro C64? 

Ecco un pacchetto di 
animazione che simula 
una tecnica di layering, 
fino ad ora privilegio degli 
utenti Amiga. 


Preparazione 

Il pacchetto è composto da tre pro¬ 
grammi, il primo dei quali è la routine 
playfield in linguaggio macchina vera 
e propria. Per inserire questo pro¬ 
gramma, useremo MLX. Ecco i valori 
richiesti. 

INDIRIZZO INIZIALE:C000 
INDIRIZZO FINALE: C61F 

Ricordate di salvare su disco una 
copia del codice con il nome 
PLAYFIELDS.OBJ, al termine della 
battitura. 

Il secondo programma è un file binario 
che contiene le definizioni degli sprite 
usate da Playfields. Anche questa 
volta dovremo fare ricorso all’MLX 


specificando una coppia di valori. 
INDIRIZZO INIZIALE:3E40 
INDIRIZZO FINALE: 3FFF 

Terminata l'operazione, salvate il pro¬ 
gramma con il nome PLAYSPRITES. 
Il terzo programma è in BASIC, e for¬ 
nisce delle indicazioni d'uso riguardo 
Playfields. Per evitare di compiere 
errori di battitura affidatevi al Corretto¬ 
re Automatico e salvate i dati sul di¬ 
schetto che già contiene PLAYFIELD. 
OBJ e PLAYSPRITES. L’uso di Play¬ 
field aH'interno di programmi creati 
dall'utente diviene possibile con l'ag¬ 
giunta delle linee 20-80 del demo al 
principio del proprio listato. 

I comandi 

Playfield è stato elaborato in maniera 
tale da costituire un’accessorio poten¬ 
te e semplice da usare nello stesso 
tempo. Il perno del programma è l’o¬ 
verlay: uno schermo ad alta risoluzio¬ 
ne simulato composto di sprite. L'alta 
risoluzione comporta diversi fastidi 
nella quasi totalità delle applicazioni, 
per via della quantità di memoria 
occupata e dei lunghi tempi di carica¬ 
mento impiegati. Oltretutto, non di 
rado disegnare aree estese diventa 
noioso. Per questi motivi, Playfield 
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usa un singolo sprite come modulo di 
campitura per l'intero overlay. Ed 
essendo inclusi nel programma tre 
overlay, non è necessario che l’utente 
disegni i propri. Con pochi comandi, si 
otterrano ottimi risultati. 

Per avere accesso alle caratteristiche 
di Playfield, inviate i comandi SYS 
descritti nei paragrafi seguenti, ese¬ 
guibili dal modo diretto o dall'interno di 
un programma BASIC. 

SYS 49854, blocco, espansione-X, 
espansione-Y, multicolor, colore 1, 
colore2, colore3 

Il comando, da chiamare prima d'ogni 
altro, attiva Playfields. Designa la 
locazione di memoria del blocco sprite 
(0-255) usato per il modulo d’overlay, 
specifica i parametri per l'espansione 
orizzontale e verticale dello sprite 
(0=off, 255=on), definisce il modo 
multicolor (0=off, 255=on) e determi¬ 
na i tre colori di overlay (0-15). Nel 
caso il modo multicolor non venga 
usato, viene considerato solamente 
l'ultimo valore. Come già accennato in 
precedenza, vi sono tre disegni modu¬ 
lari di overlay. Se desiderate usarli nei 
vostri programmi, scegliete una delle 
tre istruzioni sottostanti. 

Modulo comando 

Granito SYS 49854,255,255, 

255,255,15,11,12 
Reticolo SYS 49854,254,255, 

255,255,15,11,12 
Barre SYS 49854,253,0, 

255,255,15,11,12 

SYS 49931 

Determina la priorità d'overlay. Più 
specificamente, agisce sull’overlay 
perchè appaia anteriormente o poste¬ 
riormente allo schermo di testo. In 
caso d’omissione di definizione, all’at¬ 
tivazione di Playfields esso è situato 
davanti allo schermo di testo. 
Coprendo lo schermo di testo con un 
overlay compatto, possiamo scrivere 
del testo e far sì che compaia istanta¬ 
neamente, in modo che agli occhi del¬ 
l’osservatore si presenti solo la scher¬ 
mata finale. 

Più avanti parleremo di altre maniere 
per introdurre nuovi schermi. 


SYS 49940, velocità 
Regola la velocità di scorrimento del¬ 
l’overlay ad 1 o 0, rispettivamente 
corrispondenti a rapida e lenta. 

SYS 49969, modo 
Opta per il modo overscan. Normal¬ 
mente le grafica è limitata ai confini del 
bordo, mentre con questo comando si 
estende l’altezza dell’overlay oltre i 
bordi verticali dello schermo. Over¬ 
scan annovera tre modalità: overscan 
off (0), vale a dire disattivato: partial 
overscan (1), che estende l’overlay 
aH'interno del bordo ma solo parzial¬ 
mente: e full overlay (2), che si appro¬ 
pria totalmente del bordo. Precisiamo 
che nel modo full overscan, affinchè lo 
schermo non subisca distorsioni, l'o¬ 
verlay deve scorrere lentamente. 
SYS 49643, direzione 
Muove il pannello di overlay. Il para¬ 
metro direzionale può contenere un 
valore da 0 a 5. Con valore 0 il pannel¬ 
lo scorre attraverso lo schermo da 
sinistra a destra. Con direzione 1 
entra dal bordo sinistro e si ferma 
quando è totalmente visibile sullo 
schermo, mentre con direzione 2 esce 
dallo schermo scorrendo verso de¬ 
stra. Con i valori 3-5 si eseguono, 
nelle direzioni opposte, le funzioni 
rispettivamente corrispondenti a 0-2. 
SYS 49791, direzione 
Dispone dello scorrimento fisso. L’o¬ 
verlay scorre a destra (direzione=0) o 
a sinistra (direzione=1) senza uscire 
veramente dallo schermo. L’effetto è 
simile a ciò che vediamo quando, 
guardando fuori da una finestra, ci 
spostiamo lateralmente. Per uscire da 
questo effetto, premete la barra spa¬ 
ziatrice sino al riconoscimento da 
parte del programma, quindi lasciate. 
SYS 50028 

Produce un’onda di playfield sullo 
schermo di testo. Perchè il comando 
funzioni, sullo schermo deve essere 
presente un overlay visibile. Per usci¬ 
re premete la barra spaziatrice come 
sopra descritto. 

SYS 50564, direzione 
L’istruzione causa uno sgombero di 
playfield. In pratica spinge fuori il 
contenuto dello schermo di testo ver¬ 
so sinistra (direzione=0) o verso de¬ 


stra (direzione=1). Tutti i caratteri 
sullo schermo di testo devono essere 
dello stesso colore, poiché l’istruzione 
assegna l’attuale colore del cursore, 
inoltre la prima riga, così come le 
colonne di estrema destra e sinistra 
non possono essere utilizzate. 

SYS 50621 

Questo comando disattiva Playfields. 
Trucchi extra 

Con le istruzioni di scorrimento l’over¬ 
lay appare istantaneamente, che fos¬ 
se presente in precedenza o meno. 
Se per esempio lo schermo è vuoto e 
richiamiamo il comando di scorrimen¬ 
to fisso, verrà subito riportato l’intero 
overlay in movimento. Con il comando 
di priorità possiamo attivare e disatti¬ 
vare lo schermo di testo mentre è 
visibile l’overlay. Per pulire l’intero 
display, overlay compreso, assegna¬ 
rne al bordo lo stesso colore dello 
schermo e scriviamo POKE 49237, 
11. Per farlo comparire di nuovo usia¬ 
mo il comando overscan (SYS 49969, 
modo). La posizione verticale dell’o¬ 
verlay nel modo full overscan può 
venire spostata indirizzando con 
POKE i valori 25-35 alla locazione 
49242. Bisogna sempre riportare l’o¬ 
verlay alla posizione 27 (inoltrando la 
POKE od utilizzando il comando over¬ 
lay) al termine dell’esecuzione del 
comando d'ondulazione di playfield 
(SYS 50028). Essendo l’overlay com¬ 
posto di sprites, è possibile inoltrare 
POKE alla locazione 53271 (espan¬ 
sione-Y) per modificare la dimensione 
di una o tutte le barre di sprite. 

Combinare gli effetti 

Con Playfield l'utente non è più limita¬ 
to al movimento di piccoli sprite. Al 
contrario, si possono spostare interi 
schermi uno sull’altro, ed è facile otte¬ 
nere effetti d’animazione video. Per 
rendervi conto del potenziale di Play¬ 
fields dovrete sperimentare le sue 
molteplici opzioni; vi accorgerete pre¬ 
sto che l'efficacia della routine si pale¬ 
sa nella combinazione di diversi effetti 
in successione. 

© Computt Puhìications Tulli i diritti sono riservati. Arri 
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Q uando il disk drive 1581 
fece la sua comparsa sul 
mercato, Commodore 
ebbe a dichiarare che, 
attraverso la tecnica detta delle parti¬ 
zioni, il drive consentiva di usare sub¬ 
directory. Non venne precisato però, 
che la poca praticità dei comandi indi¬ 
spensabili per l’accesso alle partizioni 
rende infruttuoso il vantaggio da que¬ 
ste rappresentato. Con 1581 Path è 
permesso usare dei “pattinarne" per 
accedere alle partizioni, come se fos¬ 
sero vere subdirectory (simili a quelle 
dei computer MS-DOS ed Apple). 
Ora, per esempio, anziché servirci di 
complessi comandi quali 
OPEN15,9,15,70:FRED’’:CLOSE15: 
LOAD ”$",9 per esaminare il contenu¬ 
to della partizione FRED, potremo 
impiegare un'istruzione più immedia¬ 
ta, quale LOAD7FRED/$”,9. 

Come iniziare 

Poiché il codice è stato scritto in lin¬ 
guaggio macchina l'inserimento deve 
effettuarsi tramite il programma MLX, 
presente in tutti i numeri di questa 
rivista. I valori necessari alla macchi¬ 
na per il funzionamento della routine 
sono i seguenti: 

INDIRIZZO INIZIALE : 031A 
INDIRIZZO FINALE: 0401 
Quando avrete svolto completamente 
l’operazione di battitura, registrerete i 
dati prima di sgomberare MLX dalla 
memoria. 1581 Path va a collocarsi 


Robert Bixby 


Grazie a questa breve 
routine per il 64 in LM, 
non invidieremo più la facilità 
d’accessoalle subdirectory 
di cui si valgono gli utenti di 
macchine MS-DOS. 


nel sistema coprendo il vettore di 
pagina 3 della routine Kernal OPEN. 
Per attivarlo, inserite solamente 
LOAD”nome di file”,dispositivo,1, 
dove utilizzerete come nome di file il 
titolo con il quale avete salvato i dati 
dall'MLX, e sostituirete al parametro 
“dispositivo" il numero del drive. A fine 
caricamento, l’insediamento è avve¬ 
nuto; non sono necessari nè SYS nè 
RUN per l’esecuzione. Per la disatti¬ 
vazione è sufficiente premere RUN/ 
STOP-RESTORE. 

Cosa sono i Pathname 
La simulazione di vere subdirectory 
ordinate gerarchicamente, avviene 
permettendo all’utente di introdurre i 
nomi delle stesse insieme ai nomi di 
file. Da questo momento in poi, inten¬ 
deremo con il termine pathname, il 
nome di un file più i nomi di partizione 
necessari per localizzare il file all’in¬ 
terno del disco. Possiamo sostituire 


un pathname ad un nome di file in 
qualsiasi comando BASIC. I comandi 
muniti di pathname sono eseguibili dal 
modo diretto come dal modo pro¬ 
gramma, e possono persino utilizzarsi 
in altri programmi che chiedono all’u¬ 
tente un nome di file. Non è purtroppo 
possibile usare pathname con istru¬ 
zioni come SCRATCH o COPY (e.g. 
PRINT#1, ”S0:nome di file” oppure 
OPEN15,815,”CO:nuovo nome=vec- 
chio nome”). Per queste istruzioni do¬ 
vremo affidarci ai comandi per parti¬ 
zioni standard propri del DOS, descrit¬ 
ti nella Guida Utente del drive 1581. 
La sintassi per i comandi di 1581 Path 
si avvicina a quella dell’MS-DOS o del 
ProDOS Apple. 

/nome di partizione/.../nome di file 
La directory principale (root) di un 
disco è indicata da un nome di parti¬ 
zione nullo (II). Gli altri nomi di parti¬ 
zione sono preceduti da una barra (/) 
e possono venire annidati senza al¬ 
cun limite. Non includendo il nome 
della directory principale nel pathna¬ 
me, il 1581 inizia il percorso a partire 
dalla partizione attuale (come di con¬ 
sueto). Facciamo seguire un paio di 
comandi con pathname validi. 

LOAD'/MYDIR/MYFILE",8 
LOAD"//SOURCE/ASSEMBLER/ 
ARCO4.ASM",8 

Nel primo esempio viene caricato il file 
MYFILE nella patizione MYDIR. Qui si 
presume che la partizione MYDIR sia 
l’attuale directory; se non lo è, viene 
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risposto un messaggio di FILE NOT 
FOUND. Nel secondo esempio viene 
definito l’intero percorso che conduce 
al file, a partire dalla direcotry princi¬ 
pale del disco. In questo modo si è 
certi che il comando funzionerà a 
prescindere dalla directory corrente. 
Nel caso si desideri aver accesso ad 
un file il cui nome inizia con una barra, 
si deve preporre al nome di file 0: (e.g. 
al file /FILE corrisponde 0:/FILE). 

Il programma tollera l'uso di wildcards 
Commodore all’interno di pathname. 
Per esempio, il pathname //MYD7 
DIR77FILE porterebbe il 1581 a cer¬ 
care nella root di un disco una partizio¬ 
ne che corrisponde a MYD*. Se que¬ 
sta viene trovata, il drive cercherà al 
suo interno un’altra partizione coinci¬ 
dente a DIR*. Finalmente, soddisfatte 
le prime due wildcards, cercherà un 
file per ?FILE. 

Errareè umano 

Al tentativo di caricamento da un per¬ 
corso inesistente consegue un errore 
di 7FILE NOT FOUND. A questo 
messaggio segue l'anello del percor¬ 
so responsabile dello sbaglio. Lo stes¬ 
so dicasi per il salvataggio all’Interno 
di un path non valido, con la differenza 
che la posizione dell’errore non viene 
segnalata. Quando invece l’errore si 
trova in un comando OPEN il percorso 
viene passato al disk drive, che ri¬ 
sponde con il messaggio 62 FILE 
NOT FOUND sul canale d'errore. In 
tutti questi casi, la nuova directory 
sarà l’ultima alla quale si è avuto 
accesso durante il comando tentato. 

I comandi SAVE e LOAD, quando si 
cerca di accedere ad un nome di file 
che termina con una barra, ricevono in 
risposta un 7MISSING FILENAME 
ERROR. La stessa sintassi per un'i¬ 
struzione OPEN invia al disk drive un 
nome nullo, ma essendo permesso 
aprire file con nome nullo, non si 
causa alcun errore. In un nome di file 
con una sola barra al principio, questa 
non viene considerata (un nome vali¬ 
do richiede almendo due barre, una 
prima e l’altra dopo il nome di partizio¬ 
ne). Nel caso si provasse ad usare le 


partizioni con drive che non le preve¬ 
dono (1541 o 1571), i messaggi di 
risposta indicherebbero che non esi¬ 
stono. Attenzione ai programmi che 
pongono automaticamente 0: al prin¬ 
cipio del nome di file, poiché 1581 
Path non è in grado di avvertirlo, ed il 
disk drive cerca di aprire un file utiliz¬ 
zando l’intero pathname come nome 
di file (e.g. 0:/MYDIR/MYFILE). 

Come funziona 

1581 Path si carica al di sopra del tetto 
del vettore IOPEN in $31A (794) ed 
utilizza tutta la memoria riservata so¬ 
litamente al buffer di cassetta. Non si 
serve di spazio al di fuori di quest’a¬ 
rea. Se volete utilizzare qualche altro 
prodotto che altera il vettore IOPEN, 
caricate prima 1581 Path, poiché non 
controlla o salva i valori di vettore 
originali. Il programma intercetta tutti i 
nomi di file che passano dalla routine 
OPEN Kernal, incluse le istruzioni 
LOAD, SAVE e OPEN del BASIC, e 
richiama Kernal dal linguaggio mac¬ 
china. 

Divide il pathname in comandi di par¬ 


tizione distinti per ciascun passo del 
percorso, e poi invia il restante nome 
di file alla routine Kernal richiamata in 
origine. 1581 Path non intercetta chia¬ 
mate a dispositivi con numero inferio¬ 
re ad 8 o con indirizzo secondario di 
15 (il canale comandi del disk drive). 
Ciò consente di lasciare inalterate le 
istruzioni impartite direttamente a dri¬ 
ve ed altre perifieriche. Il programma 
tralascia pure i pathname che non 
iniziano con una barra, quindi i nomi di 
file esistenti rimangono validi. 
Un’ultimo avvertimento riguardo le 
istruzioni OPEN: il drive 1581 non 
permetterà di aprire due file logici in 
partizioni separate nello stesso tem¬ 
po. Assicuratevi che tutti i file aperti 
simultaneamente si trovino nella stes¬ 
sa partizione, che definirete soltanto 
nella prima istruzione d’OPEN. Se 
usate soltanto un file alla volta, potete 
selezionare una nuova partizione per 
ogni istruzione OPEN a patto che il file 
precedente sia stato debitamente 
chiuso. 

© Compule Puhlications. Tulli i diritti sono riservali 
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Prospettive ed opinioni delle maggiori software house sul futuro del 64. 


"I 


I Commodore 64 è morto". 
Abbiamo sentito gli esper¬ 
ti del mercato pronunciare 
questa frase quattro ed 
ancora due anni fa. Molti di loro persi¬ 
stono in questa convinzione. Proba¬ 
bilmente tra due anni avremo occasio¬ 
ne di riascoltare annunci funesti di 
questa sorta. 

Tra tutti i prodotti dell'industria di 
computer il Commodore 64, uscito 
nell’estate del 1982 e giunto in Italia 
nel 1985, è quello che più di ogni altro 
ricorda la tanto citata frase di Mark 
Twain. 

Ad onta dello scarso supporto fornito 
dalla società genitrice, e di un gruppo 
di software house sempre più folto 


“Le voci riguardanti la mia 
morte sono esagerate”. 
Mark Twain (1897) 

Il necrologio per il 64 è 
già stato scritto da lungo 
tempo, ma numerosi editori 
di software non cessano di 
supportare la macchina. 
Ecco il loro punto di vista. 


MickeyMcLean 


che ad esso preferisce i formati MS- 
DOS, Amiga, Nintendo e Sega, il 64 
sembra essere diventato una macchi¬ 
na immortale. 

Malgrado l'imponente fetta assorbita 
da PC e compatibili, che per poco non 
tocca l’ottanta per cento delle vendite 
di software, parecchie compagnie che 
lavorano per il 64 registrano vendite 
stazionarie. 

“Sebbene molti sapientoni ne abbiano 
annunciato il decesso, giorno dopo 
giorno la macchina si conferma una 
solida piattaforma” dice Martin Alper, 
presidente della Virgin Mastertronic, 
che produce arcade e simulazioni 
sportive per il 64. 

"Le nostre vendite per 64 ed IBM 
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competono testa a testa”. 

“Ci si poteva aspettare uno sgambetto 
da parte di Nintendo e Sega” conti¬ 
nua. “Il mercato ne ha risentito, ma 
non tanto quanto certuni avevano 
previsto". 

Una delle principali ditte che si occu¬ 
pano di simulazioni sportive è la 
SportTime Computer Software, il cui 
presidente Ed Ringler rimane piace¬ 
volmente stupito dal decorso degli 
affari. 

“Uno tra i titoli più richiesti ad Electro¬ 
nic Boutique è Omni-Play Basketball” 
spiega Ringler, “e lo stesso staff ne è 
sorpreso”. 

“Non mi sono accorto di una maggiore 
aggressività negli utenti IBM rispetto 
ai possessori di Commodore 64” ri¬ 
sponde in merito ad un confronto tra le 
due categorie d’utenza. “Continuere¬ 
mo a lavorare per il 64 a patto che 
l’aggressività non scemi”. 

Fino a non molto tempo fa, gran parte 
dei profitti di Strategie Simulations 
(SSI) provenivano dal 64. “Per la pri¬ 
ma volta nel caso di Champions of 
Krynn la richiesta iniziale MS-DOS ha 
superato quella del 64”, spiega Linda 
Blanchard, rappresentante di marke¬ 
ting per la più recente versione di 
Advanced Dungeons & Dragons. 
“Incominciamo a rilevare un cambia¬ 
mento. Eppure la nostra linea di soft¬ 
ware è parecchio diffusa tra i posses¬ 
sori di Commodore, in modo particola¬ 
re i titoli AD & D. Fino a quando gli 
utenti non smetteranno di acquistare, 
non interromperemo lo sviluppo di 
programmi". 

Concorrenza ridotta 

Il fatto che società quali Virgin Master- 
tronic, SSI, e SportTime riescano a 
mantenere un ruolo di rilievo nell'am- 
bito del mercato si può addurre in 
parte alla diminuizione di concorren¬ 
za. 

Diverse tra le società maggiori hanno 
ridotto nella quantità le edizioni per 
64, in qualche caso sono state addirit¬ 
tura interrotte oppure limitate al mer¬ 
cato europeo. Lisa Petrison, coordi¬ 
natrice per le pubbliche relazioni di 


“Può darsi che la nostra 
fetta si sia ingrandita 
proprio perchè altri 
hanno rinunciato ”, 
diceAlper. 


Mindscape dichiara: “Non stiamo svi¬ 
luppando nessun progetto, attual¬ 
mente. Molto semplicemente, la ri¬ 
sposta del pubblico non si è dimostra¬ 
ta vantaggiosa a sufficienza.” Petri¬ 
son aggiunge che uno dei più recenti 
prodotti Mindscape, Fiendish Fred- 
die’s Big Top o’ Fun è uscito solamen¬ 
te sul mercato europeo, le cui caratte¬ 
ristiche si accordano maggiormente 
agli intenti della casa. 

Secondo Joe Hubbard (Free Spirit 
Software), gli utenti degli USA consu¬ 
mano e cambiano più rapidamente. 
“In certi paesi, come l’Inghilterra o 
l’Australia, gli utenti di computer ten¬ 
gono uno stesso apparecchio per 
molto tempo. 

Non passano ad un sistema superiore 
tanto facilmente, e molti scoprono che 
non hanno affatto bisogno di andare 
oltre i limiti del 64.” 

Pur essendo un accanito sostenitore 
di 64 e 128, Hubbard ha deciso di 
concentrarsi sul mercato Amiga: 
“Dubito che concepiremo altri prodotti 
per 64, ma continueremo a sostenere 
i titoli attuali”, precisa Hubbard, sotto¬ 
lineando che la domanda per il pro¬ 
gramma d’allineamento drive 1541/ 
1571 è ancora imponente. 

“Immagino che il bisogno di tali pro¬ 
dotti sia proporzionale all’età dei dri¬ 
ve.” 

Qualità, non quantità 

Altre società hanno notato un’affinata 
facoltà di discernimento negli utenti di 
64. 

“Gli utenti Commodore sono di una 
razza diversa” sostiene Greg Malone, 
manager per le relazioni con i media 
per Origin, un'altra casa che continua 


decisa sulla propria strada. “Orgoglio¬ 
si della propria macchina, odiano le 
conversioni da altri apparecchi”. 
Nonostante questa convinzione, Ma- 
Ione aggiunge che da qualche tempo 
a questa parte Origin sviluppa i propri 
giochi prima su PC IBM, fatta eccezio¬ 
ne per Bad Blood. 

Quest’ultimo è conseguito da Times 
of Lore, sviluppato inizialmente per il 
64. Visto che dal vecchio gioco se ne 
poteva sviluppare un nuovo, Origin ha 
optato per un co-sviluppo su 64 e IBM. 
Oltre ad Origin esistono altri produttori 
(tra cui Mediagenic, Accolade ed 
Electronic Arts) che mantengono il 
mercato PC al centro delle proprie 
attenzioni e si occupano in misura 
minore della trasposizione di alcuni 
pacchetti sul 64. 

Alper, della Virgin Mastertronic, affer¬ 
ma che “Il 64 sparirà, a meno che gli 
editori ne sfruttino le capacità anziché 
considerarlo solo una fermata inter¬ 
media." 

Secondo l’esperienza delle software 
house che mantengono l’obiettivo 
primario del 64, la formula per il suc¬ 
cesso nel mercato odierno è: qualità 
uguale vendite. 

Ellen Horiuchi, della SportTime: 
“Quando confezioniamo un buon pro¬ 
dotto per il 64, la gente sembra divo¬ 
rarlo!” 

Incalza Ringler, “Senza dubbio la 
qualità sarà la carta vincente. A lungo 
termine, un prodotto avrà successo se 
e perchè è un buon prodotto." 
Purtroppo lanciare un prodotto sul 
mercato diventa sempre più difficile 
per Ringler e compagni, a causa dello 
spazio che negozi e distributori dedi¬ 
cano a Nintendo ed MS-DOS. 

La guerra degli scaffali 

Kyodai Software Marketing, ultima 
arrivata nel mercato Commodore, è 
una compagnia controllata da 12 pro¬ 
duttori giapponesi. La società ha da 
poco pubblicato un titolo arcade negli 
USA, Curse of Babylon. 

“I produttori giapponesi erano interes¬ 
sati a provare i loro prodotti sulla piaz¬ 
za del mercato Commodore" spiega 
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John Eaton, capo esecutivo di Kyodai. 
“Abbiamo così stabilito che gli utenti 
Commodore possono apprezzare un 
gioco tipo Nintendo". 

E' troppo presto per esprimersi sul¬ 
l'andamento del prodotto, ma Kyodai 
ha incontrato problemi di distribuzio¬ 
ne: “Alcuni distributori non accettano 
prodotti per Commodore”, dice Eaton. 
Ed Ringler di SportTime parteggia per 
gli utenti che devono letteralmente 
“andare a caccia” di nuovo software 
per nutrire la propria macchina. “E' 
certamente arduo per queste perso¬ 
ne: molte decisioni di loro spettanza 
sono già state prese in partenza”. 
D’altra parte, Ringler indulge nei con¬ 
fronti del distributore, il quale sacrifica 
lo spazio del 64 al fine di ospitare le 
cartucce Nintendo. 

“Solitamente i venditori finiscono con 
lo scegliere il Nintendo" sostiene. 
“Almeno non rischiano la pirateria. Ma 
se nei negozi vi sono prodotti per il 64, 
questi prodotti si vendono.” 

Uno delle più grosse catene di negozi 
del paese, Babbage's, continua a 
supportare il 64, ma il presidente della 
società Gary Kusin, non si volge al 
futuro con ottimismo. 
“Sfortunatamente, sembra che il de¬ 
stino del 64 sia segnato. Noi continue¬ 
remo a vendere i prodotti fino a che 
saranno disponibili”. 

Kusin adduce la carenza di titoli Com¬ 
modore nei negozi tanto al boom del 
mercato Nintendo quanto all'interes¬ 
se delle software house per la macchi¬ 
na, che si sta spegnendo. 

“La decisione non riguarda noi, bensì 
gli editori, che hanno smesso di fab¬ 
bricare la materia prima”; e termina 
asserendo che i prodotti giunti ai ri¬ 
venditori non hanno avuto gran suc¬ 
cesso. 

La soluzione Berkeley 

Berkeley Softworks, creatore dell’im- 
mensamente fortunato GEOS, ha 
notato un certo risparmio nell’esposi¬ 
zione del proprio software di produtti¬ 
vità. 

Vice presidente del marketing, Leland 
Llevano indica i nuovi metodi speri¬ 


mentali di vendita adottati dalla casa 
californiana. 

“Dobbiamo essere preparati. La ven¬ 
dita per corripondenza ha avuto molto 
successo, e grazie a questo metodo ci 
è possibile offrire degli incentivi agli 
acquirenti riducendo i prezzi, poiché 
non dobbiamo praticare sconti a distri¬ 
butori o rivenditori.” 

Llevano precisa prontamente che non 
è loro intenzione competere testa a 
testa con i negozianti. “Adottiamo 
questa pratica come ultima risorsa.” 
Per quanto riguarda il futuro di GEOS, 
non si prevedono nuove applicazioni, 
ma è attualmente in lavorazione una 
versione avanzata del sistema che 
sarà pronta per l'autunno prossimo. 


“Crediamo di avere colto nel segno in 
molte aree d'applicazione chiave, 
eccetto quella del divertimento, che 
non ci interessa propriamente. Conti¬ 
nueremo a supportare i prodotti esi¬ 
stenti e manterremo la nostra presen¬ 
za all’interno del Q-Link”. 

Llevano comunica poi che, in seguito 
al successo di GEORAM, sul tavolo 
dei tecnici è in elaborazione un altro 
progetto hardware che potrebbe usci¬ 
re prima del prossimo inverno. 

Data la situazione del mercato, che 
cambia di settimana in settimana, 
Llevano pone in risalto l’importanza 
delle cedole di registrazione che gli 
acquirenti di prodotti GEOS devono 
spedire al fabbricante. “Solo così 


Essendo questa la realtà del mercato statunitense (che è 
trainante), per informazioni su società ed articoli menzio¬ 
nati nel servizio riferirsi a questo elenco di indirizzi. 


Mediagenic 

3885 Bohannon Dr. 
Menlo Park, CA 94025 


Accolade 

550 S. Winchester Blvd. 
Suite 200 

San Jose, CA 95128 

Berkeley Softworks 

2150 Shattuck Ave. 
Berkeley, CA 94704 

Data East 

1850 Orchard St. 

San Jose, CA 95125 

Electronic Arts 

1820 Gateway Dr. 

San Mateo, CA 94404 

FreeSpirit 

P.O. Box 128 
58 Noble St. 

Kutztown, PA 19530 

Kyodai Software Marketing 

58 Mitchell Blvd. 

San Rafael, CA 94903 


Mindscape 

3444 Dundee Rd. 

Northbrook, IL 60062 

Origin 

110 Wild Basin Rd. 

Suite 330 
Austin, TX 78746 

SportTime Computer Software 

3187-G Airway Ave. 

Costa Mesa, CA 92626 

Strategie Simulations 

675 Almanor Ave. 

Sunnyvale, CA 94086-2901 

Virgin Mastertronic 

18001 Cowan 
Suites A & B 
Irvine, CA 92714 
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possiamo tenere informato il nostro 
pubblico" dice. 

Senza hard disk 

In sincronia con l'avvento dell'ultima 
decade del millennio, i giochi, ed in 
generale tutto l'ambiente del diverti¬ 
mento, sono diventati più sofisticati e 
richiedono molta più potenza e capa¬ 
cità di quanto il 64 sia in grado di offire. 
Molti titoli MS-DOS vengono ora ripar¬ 
titi su tre o più dischi e per un utilizzo 
appropriato fabbisognano di un hard 
disk. 

“Il guaio maggiore è che i giochi sono 
ormai molto avanzati” dice in proposi¬ 
to Martin Alper. “I programmi più este¬ 
si diventano tediosi sul 64, a causa dei 
molteplici dischetti necessari.” 

In base all’andamento del mercato 
registrato da fabbricanti ora di primo 
piano, i prodotti vincenti sono i giochi 
arcade originali, simulazioni sportive 
e pacchetti di produttività che sfrutta¬ 
no animazione, grafica e giocabilità 
intriseche al 64. 

“I giochi sportivi ed in particolare arca¬ 
de vanno molto bene" continua Alper. 
“E' più difficile tradurre le avventure, 
perchè lo schema di programmazione 
deve essere radicalmente alterato”. 
Connie Freeman di Data East sostie¬ 
ne che i generi trattati dalla compa¬ 
gnia di cui fa parte hanno resistito, ma 
conclude affermando che Data East 
non prevede la pubblicazione di nuovi 
giochi role-playing per 64. 

“Siamo più attenti alla selezione di 
titoli da destinare a questa macchina" 
continua Freeman. “Non vedrete i 
nostri role-playing sul 64 perchè la 
nostra tecnologia, che cerchiamo di 
portare un gradino più in alto, non 
trova nel 64 potenza sufficiente." 

I settori di marketing di parecchie 
software house, vista l’esplosione e 
diffusione di giochi per MS-DOS, sono 
stati spinti a convincere gli esecutivi 
ad abbandonare il 64. 

“Gli addetti al marketing sostenevano 
che Omni-Play Horse Racing era più 
adatto all'IBM, per via del mercato più 
sofisticato” spiega Ringler. “Ma abbia¬ 
mo avuto una risposta straordinaria 


"Sono i fabbricanti di 
software a determinare la 
morte dell’hardware, come 
nel caso dell’Atari 800. 
Quando nessuno realizzava 
più prodotti per la macchina, 
questa si è estinta." 

Ed Ringler, SportTime 
Software 


dagli utenti di C64. Hanno apprezzato 
grafica e dettagli. E’ un fatto che la 
versione per 64 si vende in quantità 
superiore a quella per IBM." 

Chi è il responsabile? 

Si potrebbe fare un caso del decesso 
del 64 attribuendone la colpa a Com¬ 
modore, ma l'opinione di Ed Ringler è 
differente. 

Per convincere della propria lealtà nei 
confronti del 64, Linda Blanchard ri¬ 
corda come SSI fosse stata una delle 
ultime compagnie a sostenere i com¬ 
puter Atari 8-bit. 

“Non abbandoneremo la barca fino a 
quando il mercato cesserà di esistere” 
dice infervorata. 

E’ finalmente giunta l’ultima ora per il 
64, destinato ad essere il prossimo 
calcolatore da 8-bit a cadere in disgra¬ 
zia? 

“Aspettiamo ancora un paio d’anni” 
dice Joe Hubbard, riferendosi ad 
un’ordine di tempo ben noto agli utenti 
Commodore. “La richiesta di prodotti 
diminuirà continuamente raggiungen¬ 
do un punto in cui non sarà più possi¬ 
bile sviluppare altro materiale.” 
Aggiunge poi ottimisticamente: "Ma 
c’è ancora richiesta di prodotti per CP/ 
M. ed il CP/M si è fossilizzato molto 
tempo addietro. Potrebbe succedere 
lo stesso nel nostro caso. Per l’uso 
domestico, il 64 resta un buon compu¬ 
ter, e molti non hanno bisogno di 
andare oltre.” 
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Compro 




Vendo Scambio... 


Vendo e scambio giochi ed utility 
per C64 sia disco che cassetta 
da 3miia lire in giù. Moltissimi 
programmi e tutte le ultime novi¬ 
tà. Roberto Diodati via Delfico, 
29 - 64100 Teramo. Tel. 0861/ 
35389. 

Vendo a L. 1000 cadauno giochi 
come Shinobi 2, Batman I e II. 
Cabal. Italy 90, Kick Off, Altered 
Beast, Out Run I e II e tanti altri, 
più il favoloso programma che 
trasforma il C64 in SP 48K a sole 
L. 8000. Francesco Dodde via 
Milazzo. 1 - 81030 Cellole (CE). 
Tel. 0823/933302. 

Vendo e scambio giochi solo 
disco. Giulio Scocchi via U. Fo¬ 
scolo. 30 - 34073 Grado (GP). 
Tel. 0431/82485. 

Vendo Q64, registratore, drive 
1541/11, alimentatore, cartuccia 
freezer e velocizzatore drive, 
due joystick, corso BASIC, cas¬ 
sette e dispense, vari giochi ed 
utility in cassetta e disco a L. 
700000. Telefonare ore 19.30- 
20 o scirvere. Michele Caputo 
via Grumo, 19 - 70020 Binetto 
(BA). Tel. 080/635147. 

Vendo i seguenti giochi a L. 2000 
cadauno: Bolle Bolle, Olimpiadi, 
Wonder Boy 1. Gran Prix eccete¬ 
ra. Antonio Giuliano via Zucchel- 
li, 16 - 40012 Bologna. Tel. 
723692. 

Scambio giochi per C64 solo su 
disco, aspetto la tua lista e ri¬ 
spondo a tutti. Alberto Lorenzoni 
via Marconi, 98 - 38023 Cles 
(Trento). Tel. 0463/21510. 

Vendo guida pratica di riferimen¬ 
to per il programmatore. Erman¬ 
no Manzoni via Cimarosa, 3 - 
20096 Pioltello (MI). Tel. 
92105387. 

Compro giochi su disco C64 
come: Last Ninja I e II, Robocop, 
Football a L. 2500 max cadauno. 
Angelo Miele via Canaccioni, 88 
- 03040 Cassino. Tel. 0776/ 
20416. 


Vendo espansione di memoria 
modello 1700 per CI28 e Geos 
128 versione 2.0 a L. 150000 più 
spese. Renato Borello via Ca¬ 
sca, 52 - 16011 Arenzano (GE). 
Tel. 010/9127317. 

Cerco n" 33 di Supercommodore 
64/128 su cassetta Scambio 
inoltre giochi e programmi per 
128 sia in modo 64 che 128. 
Amedeo Brunetti via Fabrizi, 24d 
- 74024 Manduria (TA). Tel. 099/ 
8795048. 

Vendo C64 ultimo tipo abbinato 
con registratore DR1535, un joy¬ 
stick, otto cassette giochi acqui¬ 
stato da poco. Il prezzo è di L. 
250000. Stefano Della Valle via 
F. Turati, 22 - 81055 S. Maria 
C.V. (CE). Tel. 0823/842761. 

Cerco istruzioni per The Final 
Cartridge anche fotocopie italia¬ 
no/inglese/francese e istruzioni 
uso adattatore telematico. Alva¬ 
ro P. Box 146 - 58022 Follonica 
(GR). 

Cerco disperatamente per CI28 
o C64 programma News Room 
con Clip Art e istruzioni. Luigi 
Poltronieri via Galliano, 1 - 22075 
Lurate Caciucco (CO). Tel. 
492093. 

Cerco giochi per Commodore 64 
(cassetta). Gradirei ricevere la 
tua lista con i relativi prezzi. Ales¬ 
sandro Vacca via Forgaria, 2 - 
33033 Codroipo (UD). Tel. 
904485. 

Scambio programmi C64 solo 
disco. Rivolgersi a Bozzetto 
Francesco via Dalmazia, 140 - 
74100 Taranto. Tel. 099/ 
362922. 

Vendo per C64 e Amiga le ultime 
novità: X-Out. Black tiger. Rain- 
bow Island, Ferrari FI, Hot Rod, 
Mith e tanti altri. Massima serietà 
e prezzi ok. Ivano Perrucci via 
Robino. 26 - 14053 Canelli (AT). 
Tel. 0141/835359. 

Compro giochi come Doublé 


Dragon, Renegade 1 e 3. He 
Man e Out Run su cassetta. 
Eraldo Gioia via Strada 0, 16 - 
87038 San Lucido (CS). Tel. 
0982/81182. 

Vendo per C64 i migliori giochi 
da L. 2500 a L. 7000 a disco 
pieno o cassetta. Telefonare ore 
pasti. Salvatore Palombo via 
Manzoni, 2 bis - 92024 Canicattì 
(AG). Tel. 0922/8555062. 

Vendo utility e giochi per C64/ 
128 a poco prezzo, inoltre impar¬ 
tisco lezioni di software. Marilena 
Gentile via Piazza Padre Pio Pac. 
- 71100 Foggia. Tel. 0881/ 
631314. 

Scambio giochi originali e vendo 
utility per C64/128 su cassetta. Li 
scambio con i seguenti giochi: 
Robocop. Batman I e II, Rambo 
1, 2 e 3. Claudio Gautelmo via 


Bonifica, 26 -0823/905701. 

Compro stampante per Olivetti 
Prodest PC 128 massimo L. 
200000. Prego massima serietà. 
Mauro Durante via A. Sartori, 6 - 
31033 Castelfranco V. Tel. 
487267. 

Scambio software per C64 su 
disco e cassetta, inviate le vostre 
liste a Vincenzo Di Vita Casella 
Postale n° 17 - 20090 Linate 
Aeroporto (MI). 

Cerco il modo per trovare la 
maschera/elmo che si trova nel 
secondo posto da destra nell’illu¬ 
strazione di Moonshadow (C64); 
invierò come compenso L. 6000 
più rimborso spese di spedizio¬ 
ne. Massima serietà. Mauro 
Rolle via Fiano. 21 - 10070 Ro- 
bassonero (TO). Tel. 011/ 
9235807. 


Il Gruppo Editoriale Jackson non si assume responsabilità in caso di 
reclami da pane degli inserzionisti e/o dei lettori. Nessuna responsabilità è 
altresì accettata per cirori e/o omissioni di qualsiasi tipo. 

La redazione si riserva di selezionare gli annunci pervenuti eliminando 
quelli palesemente a scopo di lucro o riferiti a vendita di programmi copiati. 


Inviare questo coupon a: 

"Compro, Vendo, Scambio" Super Commodore C64/128 

Gruppo Editoriale Jackson 

via Rosellini, 12 - 20124 MILANO 
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SUPER COMMODORE C64/128 















Luigi Pottronieri 

Un programmino utile a chi frequenta le medie inferiori 
e... la prima media superiore! 


I li programma (in BASIC) per¬ 
mette, dati due numeri interi e 
positivi A e B compresi tra 2 e 
268435455 ed in qualunque 
base compresa tra 2 e 20, di effettua¬ 
re con essi le principali operazioni, 
ossia: 

A+B A-B A * B A/B *VA A b 

Entrambi i numeri ed il risultato dell'o¬ 
perazione vengono mostrati in tutte le 
basi da 2 a 20; un limite: qualora il 
risultato dell’operazione scelta non 
fosse intero, esso viene arrotondato 
all'intero superiore (esempio: 4/ 
3=0,75 arrotondato ad 1 ). 

Ed eccovi un minimo di spiegazione al 
funzionamento del programma: 
000+024: presentazione. 

025+035: dimensionamento matri¬ 
ci e linee DATA. 

036+043: richiesta del numero A, 
della sua base ed azzeramento delle 
locazioni video interessate alla lettura 
da parte del computer di ogni singola 
cifra componente il numero. 
045+048: calcolo, in base 10, del 
numero A. 

049+068: calcolo, da base a base 
20, del numero A e relativo display in 
multibase. 


069+076: richiesta del numero B, 
della sua base ed azzeramento delle 
locazioni video interessate alla lettura 
da parte del computer di ogni singola 
cifra componente il numero. 
078+412: rappresentano il cuore 
del programma; ogni cifra componen¬ 
te il numero, posizionata in una preci¬ 
sa locazione della memoria video, 
viene letta ed interpretata dal compu¬ 
ter che le assegna il corretto valore 
posizionale e ricostruisce l’intero va¬ 
lore del numero. 

413+416: calcolo, in base 10, del 
numero B. 

417+435: calcolo, da base 2 a 
base 20, del numero B e relativo di¬ 
splay in multibase. 

436+466: scelta operazione. 
467+484: calcolo e display, da 

base 2 a base 20, del risultato dell’o¬ 
perazione precedentemente scelta. 
485+492: richiesta eventuale ulte¬ 
riore calcolo, congedo e reset. 

Il programma è stato scritto per fun¬ 
zionare sul CI28 in modo 128 a 40 
colonne ma funziona altrettanto bene 
sul C64 sostituendo alle linee 6 e 25 le 
istruzioni “COLOR N,X” con “POKE 
53280,N:POKE 53281 ,N” e sosti¬ 
tuendo alla linea 492 la SYS di reset 
del CI 28 con quella del C64. 


Listing di OP.MULTIB.128/40 


Listing di: OP.MULTIB.128/40 
0 rem ********************** 
REM **OPER. MULTIBASE 128* 


REM *ANDY CAPP 031-492093* 

REM ********************** 

PRINT"{CLR)":LIST0,13: 
LISTI,1:LIST4,12 

7 PRINTTAB (14) " {4 CUR.GIU) 
(RVS ON) (WHITE) ( 13 SPC} 
(RVS OFF)" 

8 PRINTTAB(14)"(RVS ON) 
{WHITE )( 13 SPC}( RVS OFF)" 

9 PRINTTAB(14)"{RVS ON) 

{WHITE ) {2 SPC} {RVS OFF ) 
MULTIBASE {RVS ON) {2 SPC) 
{RVS OFF)" 

10 PRINTTAB(14)"{RVS ON) 
(WHITE) {13 SPC) {RVS OFF}" 

11 PRINTTAB(14)"{RVS ON) 
(WHITE) {13 SPC) {RVS OFF)" 

12 PRINTTAB(14)"{RVS ON) 
{WHITE) *********** 

{RVS OFF)" 

13 PRINTTAB(14)"{RVS ON ) 
(WHITE) {13 SPC){RVS OFF)" 

14 PRINTTAB(14)"{RVS ON) 
{WHITE} DA: BASE {2 
SPC)2 {RVS OFF)" 

15 PRINTTAB(14)"(RVS ON) 
{WHITE) A : BASE20 {RVS 
OFF)" 

16 PRINTTAB(14)"{RVS ON) 
{WHITE) {13 SPC) {RVS OFF}" 

17 PRINTTAB(14)"{RVS ON) 
{WHITE) *********** 

{RVS OFF)" 

18 PRINTTAB(14)"{RVS ON) 
(WHITE) {13 SPC) {RVS OFF)" 

19 PRINTTAB(14)"{RVS ON) 
{WHITE}{4 SPC)DA {2 SPC) 

2 { 4 SPC) (RVS OFF}" 

20 PRINTTAB(14)"{RVS ON) 
(WHITE) A 268435 455 

{RVS OFF} " 

21 PRINTTAB(14)"{RVS ON) 
{WHITE) [ IN BASE10 ! ) 

{RVS OFF ) " 

22 PRINTTAB(14)"{RVS ON) 
(WHITE) {13 SPC) {RVS OFF}" 

23 PRINTTAB(14)"{RVS ON) 
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24 

25 

26 

27 

28 

29 

30 

31 

32 
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42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

50 


(WHITE) {13 SPCKRVS OFF)" 

59 

AB=AC 

110 

IFPEEK(1250)=50THENB—2 

FORAB-1TO2000 :NEXTAB 

60 

IFABO0THEN55 

111 

IFPEEK(1250)-51THENB-3 

PRINT"{CLR)": LISTO,2 : LIST 

61 

PRINTTAB(28-IB) 

112 

IFPEEK(1250)-52THENB-4 

1,1:LIST4,13 :LIST5,7 

62 

PRINTAES(IB); 

113 

IFPEEK(1250)-53THENB-5 

REM ** DIMENSIONAMENTO 

63 

IB-IB-1 

114 

IFPEEK(1250)-54THENB-6 

MATRICI ** 

64 

IFIB>0THEN62 

115 

IFPEEK(1250)-55THENB-7 

DIMAES(28),BE$(21 ),CES (21) 

65 

PRINT" IN BASE ";CE$ (KE) 

116 

IFPEEK(1250)-56THENB-8 

FORIE=lTO20 

66 

NEXTKE 

117 

IFPEEK(1250)=57THENB=9 

READBES(IE) 

67 

PRINT:PRINT"PER 

118 

IFPEEK(1249)-1THENC-10 

NEXTIE 


PROSEGUIRE PREMI [SPAZIO] " 

119 

IFPEEK(1249)-2THENC-11 

FORIE-1TO20 

68 

GETRRS : IFRR$<>" "THEN68 

120 

IFPEEK(1249)=3THENC=12 

READCES(IE) 

69 

REM ** NUMERO B DA BASE 

121 

IFPEEK(1249)-4THENC-13 

NEXTIE 


X A BASE 10** 

122 

IFPEEK(1249)-5THENC-14 

DATAO, 1,2,3,4,5,6,7,8,9, 

70 

PRINT"(CLR)" 

123 

IFPEEK(1249)-6THENC-15 

A, B, C, D, E, F, G ,H, I, J 

71 

INPUT"NUMERO B";XX$ 

124 

IFPEEK(1249)-7THENC-16 

DATAI,2,3,4,5,6,7,8,9,10, 

72 

INPUT" BASE ";CC 

125 

IFPEEK(1249)-8THENC-17 

11,12,13,14,15,16,17,18, 

73 

IFCC<20RCC>20THEN70 

126 

IFPEEK(1249)-9THENC-18 

19,20 

74 

DD-LEN(XXS) 

127 

IFPEEK(1249)-10THENC-19 

REM ** NUMERO A DA 

75 

PRINTTAB(28-DD)"{2 CUR. 

128 

IFPEEK(1249)-48THENC-0 

BASE X A BASE 10** 


GIU)";XX$ 

129 

IFPEEK(1249)=49THENC-1 

PRINT"{CLR}" 

76 

A=0:B=0:C=0:D-0:E=0:F- 

130 

IFPEEK(1249)-50THENC-2 

INPUT"NUMERO A"; XXS 


0:G-0:H-0:I-0:J=0:K=0 

131 

IFPEEK(1249)=51THENC=3 

INPUT" BASE * ; CC 


: L=0 : M=0 : N=0 : 0=0 : P-0 : Q= 

132 

IFPEEK(1249)=52THENC=4 

IFCC<2ORCC>20THEN37 


0 : R=0 : S= 0 : T=0 : U=0 : V-0 : 

133 

IFPEEK(1249)-53THENC-5 

DD=LEN(XX$) 


W-0 : X-0 : Y-0 : Z-0 : AA-0 : 

134 

IFPEEK(1249)-54THENC-6 

PRINTTAB ( 2 8-DD) "{ 2 CUR. 


BB =0 

135 

IFPEEK(1249)-5 5THENC-7 

GIU)";XX$ 

77 

GOSUB78:GOT0413 

136 

IFPEEK(1249)-56THENC-8 

A=0 : B=0 : C-0 : D-0 : E-0 : F-0 : 

78 

IFPEEK(1251)-1THENA-10 

137 

IFPEEK(1249)-57THENC-9 

G=0 : H=0 : 1=0 : J =0 : K=0 : L= 

79 

IFPEEK(1251)-2THENA-11 

138 

IFPEEK(1248)-1THEND-10 

0 : M-0 : N=0 : 0=0 : P-0 : Q=0 : 

80 

IFPEEK(1251)=3THENA=12 

139 

IFPEEK(1248)=2THEND=11 

R=0:S= 0:T=0:U=0:V-0: 

81 

IFPEEK ( 12 51 ) = 4 THENA-13 

140 

IFPEEK(1248)-3THEND-12 

W=0 : X-0 : Y-0 : Z-0 : AA-0 : 

82 

IFPEEK(1251 ) -STHENA-14 

141 

IFPEEK(1248)-4THEND-13 

BB =0 

83 

IFPEEK(1251)-6THENA-15 

142 

IFPEEK ( 12 4 8 ) =5THEND=14 

GOSUB78 

84 

IFPEEK(1251J-7THENA-16 

143 

IFPEEK(1248)-6THEND-15 

REM ** CALCOLO DEL 

85 

IFPEEK(1251)=8THENA=17 

144 

IFPEEK(1248)=7THEND=16 

NUMERO A IN BASE10 ** 

86 

IFPEEK(1251)-9THENA-18 

145 

IFPEEK(1248)=8THEND=17 

Z1=BB*CC a 27+AA*CC a 26+Z* 

87 

IFPEEK(1251)-10THENA-19 

146 

IFPEEK(1248)-9THEND-18 

CC"25+Y* CC"24+X*CC"23+ 

88 

IFPEEK(1251)=4 8THENA-0 

147 

IFPEEK(1248)-10THEND-19 

W*CC A 22+V*CC A 21 +U*CC A 

89 

IFPEEK(1251)-4 9THENA-1 

148 

IFPEEK(124 8 ) =4 8THEND-0 

20+T*CC"19+S*CC"18+R* 

90 

IFPEEK ( 12 51 ) = 5 OTHENA-2 

149 

IFPEEK(1248)-49THEND-1 

CC A 17+Q*CC A 16+P*CC , '15+ 

91 

IFPEEK(1251)-51THENA-3 

150 

IFPEEK(1248)-50THEND-2 

0*CC"14+N*C C A 13 

92 

IFPEEK ( 1251 ) -52THENA-4 

151 

IFPEEK(1248)-51THEND-3 

Z2=M*CCn2+L*CC / 'll+K*CC" 

93 

IFPEEK ( 1251)=53THENA=5 

152 

IFPEEK(1248)-52THEND-4 

10+J*CC''9+I*CC"8+H*CC A 7+ 

94 

IFPEEK ( 1251 ) -54THENA-6 

153 

IFPEEK(1248)-53THEND-5 

G*CC"6+F*CC A 5+E*CC A 4+D* 

95 

IFPEEK(1251)-55THENA-7 

154 

IFPEEK(1248)-54THEND-6 

CC~3+C*CC~2+B*CC+A 

96 

IFPEEK ( 1251 ) -56THENA-8 

155 

IFPEEK(1248)-55THEND-7 

ZZ-Z1+Z2 

97 

IFPEEK ( 1251 ) -57THENA-9 

156 

IFPEEK ( 1248 ) -56THEND-8 

REM ** CALCOLI IN 

98 

IFPEEK(1250)-1THENB-10 

157 

IFPEEK(1248)-57THEND-9 

MULTIBASE ** 

99 

IFPEEK(1250)-2THENB-11 

158 

IFPEEK ( 1247 ) -1THENE-10 

PRINT"{CLR)" 

100 

IFPEEK(1250)=3THENB=12 

159 

IFPEEK(1247)=2THENE=11 

PRINT"IL NUMERO DATO [A] 

101 

IFPEEK(1250)=4THENB=13 

160 

IFPEEK(1247)-3THENE-12 

CORRISPONDEA:PRINT 

102 

IFPEEK(1250)-5THENB-14 

161 

IFPEEK(1247)-4THENE-13 

FORKE-2TO20 

103 

IFPEEK(1250)-6THENB-15 

162 

IFPEEK(1247)-5THENE-14 

AB=ZZ 

104 

IFPEEK(1250)-7THENB-16 

163 

IFPEEK(1247)-6THENE-15 

IB=0 

105 

IFPEEK(1250)=8THENB=17 

164 

IFPEEK(1247)-7THENE-16 

AC=INT(AB/KE) 

106 

IFPEEK(1250)-9THENB-18 

165 

IFPEEK(1247)-8THENE-17 

RE=AB-KE*AC 

107 

IFPEEK(1250)-10THENB-19 

166 

IFPEEK(1247)=9THENE=18 

IB=IB+1 

108 

IFPEEK(1250)-48THENB-0 

167 

IFPEEK(1247)-10THENE-19 

AE$(IB)=BE$(RE+1) 

109 

IFPEEK(1250)=49THENB-1 

168 

IFPEEK( 1 24 7)-4 8THENE-0 
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214 
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220 

221 

222 

223 

224 

225 

226 

227 


IFPEEK(1247)=49THENE=1 

228 

IFPEEK(1243)=48THENI=0 

287 

IFPEEK(1238)=57THENN=9 

IFPEEK(1247)«50THENE=2 

229 

IFPEEK(1243)=49THENI=1 

288 

IFPEEK(1237)=48THENO=0 

IFPEEK(1247)=51THENE=3 

230 

IFPEEK(1243)=50THENI=2 

289 

IFPEEK(1237)=4 9THENO1 

IFPEEK(1247)=52THENE=4 

231 

IFPEEK(1243)=51THENI=3 

290 

IFPEEK(1237)=50THENO=2 

IFPEEK(1247)-53THENE-5 

232 

IFPEEK(1243)-52THENI-4 

291 

IFPEEK(1237)=51THENO=3 

IFPEEK(1247)=54THENE=6 

233 

IFPEEK(1243)=53THENI=5 

292 

IFPEEK(1237)=52THENO=4 

IFPEEK(1247)=5STHENE=7 

234 

IFPEEK(1243)=54THENI=6 

293 

IFPEEK(1237)-53THENO-5 

IFPEEK(1247)-56THENE-8 

235 

IFPEEK(1243)-55THENI-7 

294 

IFPEEK(1237)=54THENO=6 

IFPEEK(1247)=57THENE=9 

236 

IFPEEK(1243)=56THENI=8 

295 

IFPEEK(1237)«55THENO=7 

IFPEEK(1246)=1THENF=10 

237 

IFPEEK(1243)=57THENI=9 

296 

IFPEEK(1237)=56THENO=8 

IFPEEK(1246)=2THENF=11 

238 

IFPEEK(1242)=48THENJ-0 

297 

IFPEEK(1237)=57THENO=9 

IFPEEK(1246)=3THENF=12 

239 

IFPEEK(1242)=49THENJ=1 

298 

IFPEEK(1236)=48THENP=0 

IFPEEK(1246)=4THENF=13 

240 

IFPEEK(1242)-50THENJ-2 

299 

IFPEEK(1236)=49THENP=1 

IFPEEK(1246)=5THENF=14 

241 

IFPEEK(1242)=51THENJ=3 

300 

IFPEEK(1236)=50THENP=2 

IFPEEK(1246)=6THENF=15 

242 

IFPEEK(1242)=52THENJ=4 

301 

IFPEEK(1236)=51THENP=3 

IFPEEK(1246)-7THENF=16 

243 

IFPEEK(1242)-53THENJ-5 

302 

IFPEEK(1236)=52THENP=4 

IFPEEK(1246)=8THENF=17 

244 

IFPEEK(1242)=54THENJ=6 

303 

IFPEEK(1236)=53THENP=5 

IFPEEK(1246)=9THENF=18 

245 

IFPEEK(1242)=55THENJ=7 

304 

IFPEEK(1236)=54THENP=6 

IFPEEK(1246)-10THENF-19 

246 

IFPEEK(1242)=56THENJ=8 

305 

IFPEEK (1236)=55THENP=7 

IFPEEK(1246)=48THENF=0 

247 

IFPEEK(1242)=57THENJ=9 

306 

IFPEEK(1236)=56THENP=8 

IFPEEK(1246)=49THENF=1 

248 

IFPEEK(1241)=4 8THENK-0 

307 

IFPEEK(1236)=57THENP=9 

IFPEEK(1246)=50THENF=2 

249 

IFPEEK(12 41)=4 9THENK=1 

308 

IFPEEK(1235)=48THENQ=0 

IFPEEK(1246)-51THENF-3 

250 

IFPEEK(1241)=50THENK=2 

309 

IFPEEK(1235)=49THENQ=1 

IFPEEK(1246)=52THENF=4 

251 

IFPEEK(1241)=51THENK=3 

310 

IFPEEK(1235)=50THENQ=2 

IFPEEK(1246)=5 3THENF=5 

252 

IFPEEK(1241)=52THENK=4 

311 

IFPEEK(1235)=51THENQ=3 

IFPEEK(1246)=54THENF=6 

253 

IFPEEK(1241)-53THENK-5 

312 

IFPEEK(1235)=52THENQ=4 

IFPEEK(1246)-55THENF-7 

254 

IFPEEK(1241)=54THENK=6 

313 

IFPEEK(1235)=S3THENQ=5 

IFPEEK(1246)=56THENF=8 

255 

IFPEEK(1241)=55THENK=7 

314 

IFPEEK(1235)-54THENQ-6 

IFPEEK(1246)=57THENF=9 

256 

IFPEEK(1241)“56THENK-8 

315 

IFPEEK(1235)»55THENQ=7 

IFPEEK(1245)-1THENG-10 

257 

IFPEEK(1241)=57THENK=9 

316 

IFPEEK(1235)=56THENQ=8 

IFPEEK(1245)=2THENG=11 

258 

IFPEEK(1240)=48THENL=0 

317 

IFPEEK(1235)=57THENQ-9 

IFPEEK(1245)= 3THENG=12 

259 

IFPEEK(1240)=49THENL=1 

318 

IFPEEK(1234)=48THENR=0 

IFPEEK(1245)=4THENG=13 

260 

IFPEEK(1240)=50THENL=2 

319 

IFPEEK(1234)=49THENR=1 

IFPEEK(1245)=5THENG=14 

261 

IFPEEK(12 4 0)-51THENL=3 

320 

IFPEEK(1234)=50THENR=2 

IFPEEK(1245)= 6THENG=15 

262 

IFPEEK(1240)=52THENL=4 

321 

IFPEEK(1234)=51THENR=3 

IFPEEK(1245)=7THENG=16 

263 

IFPEEK(1240)=53THENL=5 

322 

IFPEEK(1234)=52THENR=4 

IFPEEK(1245)=8THENG=17 

264 

IFPEEK(1240)=54THENL=6 

323 

IFPEEK(1234)»53THENR=5 

IFPEEK(1245)=9THENG=18 

265 

IFPEEK(1240)=55THENL=7 

324 

IFPEEK(1234)=54THENR=6 

IFPEEK(1245)=10THENG=19 

266 

IFPEEK(1240)=56THENL=8 

325 

IFPEEK(1234)=55THENR=7 

IFPEEK(1245)=48THENG=0 

267 

IFPEEK(1240)=57THENL=9 

326 

IFPEEK(1234)=56THENR=8 

IFPEEK(1245)=49THENG=1 

268 

IFPEEK(1239)=48THENM=0 

327 

IFPEEK(1234)=57THENR=9 

IFPEEK(1245)=50THENG=2 

269 

IFPEEK ( 12 3 9 ) =4 9THENM= 1 

328 

IFPEEK(1233)=48THENS=0 

IFPEEK(1245)=51THENG=3 

270 

IFPEEK(1239)-50THENM-2 

329 

IFPEEK(1233)=49THENS=1 

IFPEEK(1245)=52THENG=4 

271 

IFPEEK(1239)=51THENM=3 

330 

IFPEEK(1233)=50THENS=2 

IFPEEK(1245)=53THENG=5 

272 

IFPEEK(1239)=52THENM=4 

331 

IFPEEK(1233)=51THENS=3 

IFPEEK(1245)-54THENG-6 

273 

IFPEEK(1239)=53THENM=5 

332 

IFPEEK(1233)=52THENS=4 

IFPEEK(1245)=55THENG=7 

274 

IFPEEK(1239)=54THENM=6 

333 

IFPEEK(1233)=53THENS=5 

IFPEEK(1245)-56THENG-8 

275 

IFPEEK(1239)=55THENM=7 

334 

IFPEEK(1233)=54THENS=6 

IFPEEK(1245)=57THENG=9 

276 

IFPEEK(1239)=56THENM=8 

335 

IFPEEK(12 3 3)=5 5THENS=7 

IFPEEK(1244)=48THENH=0 

277 

IFPEEK(12 3 9)= 5 7THENM= 9 

336 

IFPEEK(1233)-56THENS=8 

IFPEEK(1244)=49THENH=1 

278 

IFPEEK(1238)-4 8THENN-0 

337 

IFPEEK(1233)=57THENS=9 

IFPEEK(1244)-50THENH-2 

279 

IFPEEK(1238)=4 9THENN=1 

338 

IFPEEK(1232)=48THENT=0 

IFPEEK(1244)=51THENH=3 

280 

IFPEEK(1238)=50THENN=2 

339 

IFPEEK(1232)=4 9THENT=1 

IFPEEK(1244)=52THENH=4 

281 

IFPEEK(1238)-51THENN-3 

340 

IFPEEK(1232)=50THENT=2 

IFPEEK(1244)=53THENH=5 

282 

IFPEEK(1238)=52THENN=4 

341 

IFPEEK(1232)=51THENT=3 

IFPEEK(1244)-54THENH-6 

283 

IFPEEK(1238)=53THENN=5 

342 

IFPEEK(1232)=52THENT=4 

IFPEEK(1244)=55THENH=7 

284 

IFPEEK(1238)=54THENN=6 

343 

IFPEEK(1232)=53THENT=5 

IFPEEK(1244)-56THENH-8 

285 

IFPEEK(1238)=55THENN=7 

344 

IFPEEK(1232)=54THENT=6 

IFPEEK(1244)=57THENH=9 

286 

IFPEEK(1238)=56THENN=8 

345 

IFPEEK(1232)=55THENT=7 
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346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

52 


IFPEEK(1232)=56THENT=8 

405 

IFPEEK(1226)=55THENZ=7 


(RVS OFF) DIVISIONE A : 

IFPEEK(1232)-57THENT-9 

406 

IFPEEK(1226)=56THENZ=8 


B"SPRINT 

IFPEEK(1231)=48THENU=0 

407 

IFPEEK(1226)-57THENZ=9 

444 

PRINTTAB(10)"{RVS ON} 5 

IFPEEK(1231)=49THENU=1 

408 

IFPEEK(1225)=48THENAA=0 


(RVS OFF) RADICE B DI 

IFPEEK(1231)-50THENU-2 

409 

IFPEEK(1225)=49THENAA=1 


A" :PRINT 

IFPEEK(1231)=51THENU=3 

410 

IFPEEK(1224)-48THENBB-0 

445 

PRINTTAB(10)"(RVS ON} 6 

IFPEEK(12 31)-52THENU-4 

411 

IFPEEK(1224)=4 9THENBB=1 


(RVS OFF) POTENZA B DI 

IFPEEK(1231)=53THENU=5 

412 

RETURN 


A" :PRINT 

IFPEEK(1231)=54THENU=6 

413 

REM ** CALCOLO DEL NUMERO 

446 

GETSS5:IFSS$=""THEN446 

IFPEEK(12 31)= 5 5THENU-7 


B IN BASE 10 ** 

447 

SS=VAL(SSS) 

IFPEEK(1231)=56THENU=8 

414 

U1=BB*CC A 27+AA*CC A 26+Z*CC A 

448 

IFSS<10RSS> 6THEN44 6 

IFPEEK(1231)=57THENU=9 


25+Y*CC A 24+X*CC A 23+W*CC A 

449 

IFSS$="1"THEN455 

IFPEEK(1230)-48THENV=0 


22+V*CC A 21+U*CC A 20+T*CC A 

450 

IFSS$-"2"THEN457 

IFPEEK(1230)=49THENV-1 


19+S*CC A 18+R*CC A 17+Q*CC A 

451 

IFSS$="3”THEN459 

IFPEEK(1230)=50THENV=2 


16+P*CC A 15+0*CC A 14+N* 

452 

IFSS$="4"THEN4 61 

IFPEEK(1230)-51THENV=3 


cc A i3 

453 

IFSS$="5"THEN463 

IFPEEK(1230)=52THENV=4 

415 

U2«M*CC A 12+L*CC A 11+K*CC A 

454 

IFSS$="6"THEN465 

IFPEEK(1230)=53THENV=5 


10+J*CC A 9+I*CC A 8+H*CC A 7 

455 

FF=ZZ+UU 

IFPEEK (1230) =54THENV=-6 


+G*CC A 6+F*CC A 5+E*CC A 4+ 

456 

G0T0467 

IFPEEK(1230)=55THENV=7 


D*CC A 3+C*CC A 2+B*CC+A 

457 

FF-ZZ-UU 

IFPEEK(1230)=56THENV=8 

416 

UU-U1+U2 

458 

G0T0467 

IFPEEK(1230)-57THENV-9 

417 

REM ** CALCOLI IN 

459 

FF=ZZ*UU 

IFPEEK(1229)=48THENW=0 


MULTIBASE ** 

460 

G0T0467 

IFPEEK(1229)=49THENW=1 

418 

PRINT"(CLR)" 

461 

FF=ZZ/UU 

IFPEEK(1229)-50THENW-2 

419 

PRINT"IL NUMERO DATO (B) 

462 

G0T0467 

IFPEEK(1229)=51THENW=3 


CORRISPONDE A: PRINT 

463 

FF=ZZ A (1/UU) 

IFPEEK(1229)=52THENW=4 

420 

FORKE=2TO20 

464 

G0T0467 

IFPEEK(1229)=53THENW-5 

421 

AB=UU 

465 

FF=ZZ A UU 

IFPEEK(1229)=54THENW=6 

422 

IB»0 

466 

GOT0467 

IFPEEK(1229)=55THENW=7 

423 

AC=INT(AB/KE) 

467 

REM ** CALCOLO RISULTATO 

IFPEEK(1229)=56THENW=8 

424 

RE=AB-KE*AC 


IN MULTIBASE ** 

IFPEEK(1229)-57THENW=9 

425 

IB=IB+1 

468 

PRINT"(CLR)" 

IFPEEK(1228)=48THENX=0 

426 

AE$(IB)=BE$(RE+1) 

469 

PRINT"IL RISULTATO 

IFPEEK ( 1228) =49THENX= 1 

427 

AB=AC 


CORRISPONDE A: PRINT 

IFPEEK(1228)=50THENX=2 

428 

IFABO0THEN423 

470 

FORKE=2TO20 

IFPEEK(1228)=51THENX=3 

429 

PRINTTAB(28-IB) 

471 

AB=FF 

IFPEEK(1228)-52THENX-4 

430 

PRINTAES(IB); 

472 

IB=0 

IFPEEK(1228)=53THENX=5 

431 

IB=IB-1 

473 

AC=INT(AB/KE) 

IFPEEK(1228)-54THENX=6 

432 

IFIB>0THEN430 

474 

RE=AB-KE*AC 

IFPEEK(1228)=55THENX=7 

433 

PRINT" IN BASE ";CES (KE) 

475 

IB=IB+1 

IFPEEK(1228)=56THENX=8 

434 

NEXTKE 

476 

AE$(IB)=BE$(RE+1) 

IFPEEK(1228)-57THENX=9 

435 

PRINT : PRINT"PER PROSEGUIRE 

477 

AB-AC 

IFPEEK(122 7)=4 8THENY-0 


PREMI [SPAZIO]" 

478 

IFABO0THEN473 

I FPEEK ( 1227 ) =4 9THENY= 1 

436 

REM ** SCELTA OPERAZIONE 

479 

PRINTTAB(28-IB) 

IFPEEK(1227)=50THENY=2 

** 


480 

PRINTAES(IB); 

IFPEEK(1227)=51THENY=3 

437 

GETRRS : IFRRSo" "THEN437 

481 

IB-IB-1 

IFPEEK(1227)=52THENY=4 

438 

PRINT"(CLR)" 

482 

IFIB>0THEN480 

IFPEEK(1227)=53THENY=5 

439 

PRINTTAB (10) "(2 CUR.GIU) 

483 

PRINT" IN BASE ";CE$ (KE) 

IFPEEK(1227)-54THENY=6 


SCEGLI L'OPERAZIONE:" 

484 

NEXTKE 

IFPEEK(1227)=55THENY=7 
IFPEEK(1227)=56THENY=8 

440 

PRINT:PRINT:PRINT:PRINT 
TAB(10) "(RVS ON) 1 (RVS OFF) 

485 

PRINT:PRINT"VUOI UN ALTRO 
CALCOLO? [S/N]" 

IFPEEK(1227)-57THENY-9 


SOMMA A + B":PRINT 

486 

GETXES: IFXE$-""THEN486 

IFPEEK(1226)=48THENZ=0 

441 

PRINTTAB(10)"(RVS ON)2 

487 

IFXE$="S"THEN37 

IFPEEK(1226)=49THENZ=1 


(RVS OFF) SOTTRAZIONE A - 

488 

IFXE$o"N"THEN485 

IFPEEK(1226)-50THENZ-2 


B":PRINT 

489 

IFXE$-"N"THENPRINT"(CLR) " 

IFPEEK(1226)=51THENZ=3 
IFPEEK(1226)-52THENZ-4 

442 

PRINTTAB ( 10 ) " ( RVS ON } 3 
(RVS OFF) MOLTIPLICAZIONE 

490 

PRINTTAB(17)"(12 CUR. 
GIU1CIAO" 

IFPEEK(1226)=53THENZ=5 


A X B":PRINT 

491 

F0RHH=1T01500 :NEXTHH 

IFPEEK(1226)=54THENZ=6 

443 

PRINTTAB(10)"(RVS ON)4 

492 

PRINT"(CLR)":SYS65341 
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N ell'anno 2100 le armi nu¬ 
cleari altro non sono che le 
vestigia di un'era dimenti¬ 
cata. Infatti, anche se la 
pace non regna sempre 
sovrana, le divergenze tra le varie 
nazioni vengono appianate semplice- 
mente con un duello tra gladiatori (mi 
ricorda vagamente l’antica Roma, a 
voi no?!). Luogo dello scontro è un 
campo di battaglia costituito da colline 
ed avvallamenti. 

Al principo di ogni combattimento sei 
letali bombe sferoidali vengono spar¬ 
se casualmente nell’arena. 

Ciascun competitore si muove su di 
un hovercraft per cercare di raccoglie¬ 
re le bombe e per scagliarle contro 
l’avversario. Le bombe, a causa della 
forma sferica, rotolano nell'arena ad 
alta velocità ma nello stesso tempo il 
loro movimento è reso imprevedibile 




dalla superficie ondulata del campo. 
Sebbene la prima impressione data 
da questo game sia di notevole sem¬ 
plicità, impararete presto (a vostre 
spese...) come in Spheroids la so¬ 
pravvivenza sia legata alla prontezza 
di riflessi ed alla precisione della vo¬ 
stra mira; ogni errore di valutazione, 
quando anche riuscite a sopravvive¬ 
re, vi crea seri problemi. 

Come iniziare 

Spheroids si compone di tre program¬ 
mi. Inseriamo i dati dei primi due 
(scritti in BASIC) tramite il Correttore 
Automatico, in modo da evitare errori 
ortografici. Eseguito l'inserimento, 
salviamo i programmi su disco con i 
nomi SPHEROIDS.BOOT e SPHE¬ 
ROIDS.BASIC. 

Il terzo programma è scritto in linguag¬ 
gio macchina, e richiede di essere 


Kevin Dixon 

Uno spettacolare 
arcade d'azione 
per il vostro C64 
con il quale 
potete sfidarei 
vostri amici 
divertendovi. 
Sono richiesti 
due joystick. 
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inoltrato per mezzo dell’MLX. I valori 
necessari a! programma sono i se¬ 
guenti: 

INDIRIZZO INIZIALE: $0801 
INDIRIZZO FINALE: $1788 

Una volta completata l’operazione, 
salviamo il programma su disco come 
SPHEROIDS.ML. 

A questo punto siamo pronti per gio¬ 
care: dopo aver collegato i due joy¬ 
stick, carichiamo e lanciamo 
SPHEROIDS.BOOT. 

Dopo qualche momento farà la pro¬ 
pria comparsa lo schermo di presen¬ 
tazione del gioco, con la tabella degli 
oggetti che ne sono protagonisti. Pre¬ 
miamo un tasto od il pulsante di fuoco 
per continuare. 

Prepariamoci... 
a combattere 

Prima di ogni scontro viene proposto 
al giocatore un menu che consente di 
scegliere e creare diversi campi di 
battaglia. I tasti f3 ed f4 scorrono le se¬ 
lezioni, ed fi genera il campo di batta¬ 
glia sullo schermo. La scelta del 
campo si può anche eseguire tramite 
joystick: i movimenti verso destra e 
sinistra passano da una voce all’altra, 
verso l’alto od il basso costruiscono 
l’arena vera e propria. 

La gamma di possibilità prevede sei 
tipologie: Open, Lattice, Diamond, 
Cyclone, Quadrate e Random. Tutti i 
campi, ad eccezione di Open, conten¬ 
gono depressioni e collinette, rappre¬ 
sentate sullo schermo da elementi 
romboidali di quattro dimensioni. Le 
colline sono di colore blu, e gli avval¬ 
lamenti di colore grigio. Tutti i campi 
sono dotati di un dispositivo di teletra¬ 
sporto, che appare come un quadrato 
giallo lampeggiante. 

Quando un hovercraft od uno sferoide 
entra nel teletrasporto, viene inviato in 
un altro luogo del piano e scelto ca¬ 
sualmente. 

Durante il processo, l’elemento tra¬ 
sportato conserva la velocità e la dire¬ 
zione originariamente impostata. 
Dopo la scelta del campo, premete f7 



od il pulsante di fuoco per dare inizio 
allo scontro. 

Al principio di ogni partita, ciascun gio¬ 
catore dispone di ben nove hover¬ 
craft. La navetta verde è controllata 
dal joystick 1 e si trova nell’angolo su¬ 
periore sinistro dello schermo, mentre 
la nave blu, corrispondente al josytick 
2 viene collocata in basso a destra. 
Nella parte superiore possiamo leg¬ 
gere il numero di mezzi rimanenti a 
ciascun giocatore dopo ogni scontro. 
La partita termina, naturalmente, 
quando uno dei due combattenti vede 
interamente distrutta la propria flotta. 

Il gioco 

Gli avversari utilizzano le bombe, o 
sferoidi, per annientarsi a vicenda, 
ecco perché è necessario essere 
molto veloci nel raccoglierli, in tal 
modo potrete farne una scorta mag¬ 
giore ed essere avvantaggiati nel 
momento in cui date battaglia. Ca¬ 
sualmente sparsi nell’area di gioco, vi 
sono sei sferoidi, che, appunto, ven¬ 
gono raccolti e lanciati ad altissima 
velocità dall’hovercraft. 

Le bombe si raccolgono passandovi 
sopra con la navetta, e si sparano 
muovendo il joystick nella direzione 
desiderata e premendo contempora¬ 
neamente il pulsante di fuoco. Una 
volta scagliato, lo sferoide assume il 
colore della nave di provenienza. 
Quando una bomba entra in contatto 
con l’avversario, questi è immediata¬ 
mente distrutto. 

La velocità di lancio degli sferoidi è 
sufficiente per far loro percorrere una 
lunghezza doppia aN'arena. Quando 
l'energia si esaurisce, la bomba ral¬ 


lenta e ritorna di colore rosso; a que¬ 
sto punto entrambi i giocatori possono 
raccoglierla e servirsene nuovamen¬ 
te. 

Dato che gli sferoidi rotolano sul 
campo, depressioni e colline condi¬ 
zionano i vostri spostamenti. Se per 
esempio uno sferoide viene lanciato 
verso una depressione, rotolerà sui 
lati della buca sino a fermarsi, ponia¬ 
mo, nel centro. 

Quando il gioco è terminato, premete 
un tasto qualsiasi per ritornare al 
menu principale. Per mettere in pausa 
il game premete il tasto RUN/STOP, 
mentre per ricominciare una nuova 
partita, premere SHIFT-Q. 

Le regole del gioco 
equalche suggerimento... 

Ci sono diverse strategie di gioco nel¬ 
le quali potrete cimentarvi. A volte 
quando sparate uno sferoide all'inter¬ 
no del teletrasportatore questa si ma¬ 
terializzerà vicino al vostro avversa¬ 
rio, distruggendo il suo ship. Provate 
anche ad usare le colline e le depres¬ 
sioni per rimarginare le buche che tro¬ 
vate nel percorso. 

A volte può succedere che il vostro 
ship cada negli avvallamenti, dovrete 
semplicemente spingere la leva del 
joystick nella direzione in cui volete 
andare e vi ritroverò sbalzati fuori al¬ 
l'improvviso, anche se questa opera¬ 
zione può rivelarsi complessa. Il me¬ 
todo ancora più veloce e sicuro per 
uscire da un avvallamento è quello di 
far oscillare lo ship avanti e indietro 
fino a quando non riuscirete a passare 
oltre. 

In alcuni casi, diversi sferoidi appaio¬ 
no nello praticamente allo stesso 
istante molto vicini. Se premete il fire 
e fate manovra attorno ad essi spare¬ 
rete una raffica mortale nella direzio¬ 
ne in cui state viaggiando e i vostri 
nemici avranno ben poche possibilità 
di fuga. 

Anche sparare una raffica di sferoidi 
nel teletrasportatore corrisponde a 
morte sicura per i vostri nemici. In 
definitiva se giocate bene le vostre 
carte, scoprirete che nel momento in 
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cui gli sferoidi si materializzano vicino 
a loro, i vostri avversari riusciranno 
difficilmente ad evitarli. 

Listing BOOT 

10 Q$-CHR$<34) 

20 POKE53281,0:POKE53280, 0 

30 PRINT"{GRAY3){CLR)LOADING 
SPHEROIDS. 

40 PRINT"{BLACK}{HOME}{2 CUR. 

GIU)POKE43,1:POKE44,40 : 
POKE10240,0:NEW" 

50 PRINT"{2 CUR.GIU)L{SH 0} 
"Q$"SPHERE.ML"Q$", 8,1” 

60 PRINT" {4 CUR. GIU ) NEW" 

70 PRINT" {2 CUR.GIU}L{SH O) 

"Q$"SPHERE.BAS"QS",8" 

80 PRINT"{4 CUR.GIU)RUN 
{HOME}"; 

90 POKE198,5:POKE631,13:POKE 
632,13:POKE633,13:POKE634, 
13:POKE635,13 

Listing BASIC 

10 REM COPYRIGHT 1990 

COMPUTE! PUBLICATIONS, 

INC. - ALL RIGHTS RESERVED 
20 POKE54296,15:POKE53280,0 

:POKE53281,0:SYS2636 
:DIMP$(4) 

30 PS (0)-"{RVS ON) {3 SPC) 

{CUR.GIU) {3 CUR.SIN) {3 
SPC}" 

40 PS (1)-"{RVS OFF) {SH A) {SH 
BHRVS ON) {CUR.SU) {2 CUR. 
SIN) {RVS OFF) {SH C) {SH D)" 
50 PS (2)="{RVS OFF) (SH E) {SH 
F) {CUR.GIU) {2 CUR.SIN) {RVS 
ON) {RVS OFF) {SH G) {SH H)" 
60 PS <3)-"{RVS OFF) {SH I) {SH 
J) {RVS ON) {CUR.GIU) {2 CUR. 
SIN) {RVS OFF) {SH K) (SH L}" 
70 PS (4)="{RVS OFF) {SH M) {SH 
N) {CUR.SU) {2 CUR.SIN) {RVS 
ON) {RVS OFF) {SH O) (SH P)" 
80 F0RI-1T06:READT$(I) 
:NEXT:S$=T$(1) 

90 DATA "OPEN { 4 SPC ) ", " 
LATTICE ", "DIAMONDS", 
"CYCLONE ", "QUADRATE", 
"RANDOMf2 SPC)" 

100 Tl$=" {CBM A) {SH * ) {CBM S} 

{CBM A) {SH *} {CBM S) {CBM 

R) {CBM R) {CBM A) {SH *) 

{CBM S) {CBM A) {SH *} {CBM 

S) {CBM A) {SH *} {CBM S) {CBM 


A) {CBM R) {CBM S) {CBM R) {SH 
*} {CBM S) {CBM A) {SH *) {CBM 

sr 

110 T2S-"{CBM Z) {SH *) {CBM S) 
{CBM Q) {SH * } {CBM X) {CBM 
Q ){SH *} {CBMW) {CBM Q ) {SH 
*} {CBM Q) {CBM R) {CBM X) 
{SH -) {SH -) {SH -} {SH 
-) {SH -} {CBM Z) {SH *) 

{CBM S ) " 

120 T3S-"{CBM Z) {SH *) {CBM X) 
{CBM E) {2 SPC) {CBM E) {CBM 
E) {CBM Z) {SH *} {CBM X) {CBM 
E) (CBM Z) {CBM X} {CBM Z) {SH 
*) {CBM X) {CBM Z) {CBM E) 
{CBM X) {CBM E) {SH *) {CBM 
X) {CBM Z) (SH *} {CBMX)" 

130 TC$-"{WHITE) {GRAY3HGRAY 
2)(GRAY1){BROWN)(RED) 
{ORANGE){LT.RED){YELLOW}" 
140 GOSUB2280 
150 PRINT"{CLR)"; 

160 S=l:MO=l:GOTO380 
170 PRINT"{HOME}{LT.RED}{RVS 
ON) SELECTED: ";T$(S);"{5 
SPOSHOWN: S$; " " 

180 POKE198,0 
190 GETA5 

200 J-MPEEK(56320)ANDPEEK 
(56321)) 

210 IFA$="{F5)"THENGOSUB 
1330:GOSUB1390 

220 IFA$="{F7}"THENGOSUB1330 
:SYS2633:SYS2624:GOTO450 
230 IF(JAND16)=0THENGOSUB 
1330:SYS2633:SYS2624: 
GOTO450 

240 IFA$="(F3)"THEN320 
250 IF(JAND8)“0THEN320 
260 IFA$="(F4)"THEN350 
270 IF(JAND4)=0THEN350 
280 IFA$="{FI)"THEN380 
290 IF(JAND1)“OOR(JAND2)“0 
THEN380 

300 IFA$="{F8)"THENGOSUB1330: 

GOSUB2280:SYS2633:GOTO450 
310 GOTO190 
320 S=S+1:IFS=7THENS=1 
330 GOSUB1330 
340 GOTO170 
350 S=S-1:IFS=0THENS=6 

360 GOSUB1330 
370 GOTO170 

380 PRINT"{HOME) {RVS ON) {LT. 
RED) GENERATING ";T$ (S) ; 
"(19 SPC)":POKE1024 + 39, 160 
390 POKE55296+39,10 

400 POKE218,PEEK(218)OR128 
410 GOSUB1330 


420 ONSGOSUB1740,1790,1430, 
1590,2120,1950 
430 S$-T$(S) 

440 SYS2630 

450 IFMO=1THENGOSUB113 0 

460 GOSUB1330 

470 GOTO170 

480 REM DRAW MOUND/DEPRESSION 
490 PRINTMIDS(C$,1,1); 

500 FORI-1TOX 

510 PRINTPS(1);"{CUR.SU)"; 

520 NEXT 

530 PRINTMIDS(CS,2,1); 

"{CUR.GIU)"; 

540 FORI=lTOX 

550 PRINTPS(2);"{CUR.GIU}"; 

560 NEXT 

570 F0RI=1T02*X 

580 PRINT"{3 CUR.SIN)"; 

590 NEXT 

600 PRINTMIDS(C$,3,1); 

610 FORI=lTOX 

620 PRINTPS(3);"{CUR.GIU)"; 

630 NEXT 

640 PRINTMIDS(CS,4,1); 

"{CUR.SU}"; 

650 FORI=lTOX 

660 PRINTPS(4);"(CUR.SU)"; 

670 NEXT 

680 PRINT"{CUR.SU)"; 

690 IF X=1 THEN920 
700 FORJ-X-lTOlSTEP-1 
710 FORI=lTOJ*2+lSPRINT"{3 
CUR.SIN)";:NEXT 
720 PRINTMIDS(C$,1,1); 

730 FORI-1TOJ 

740 PRINTPS (0) ;"{3CUR.SU}"; 
750 NEXT 

760 PRINTMIDS(CS,2,1); "{2 
CUR.GIU)"; 

770 FORI=lTOJ 

780 PRINTPS(0);"{CUR.GIU)"; 

790 NEXT 

800 F0RI-1T02*J 

810 PRINT"{3 CUR.SIN}"; 

820 NEXT 

830 PRINTMIDS(C$,3,1); 

840 FORI-1TOJ 

850 PRINTPS(0);"{CUR.GIU}"; 

860 NEXT 

870 PRINTMIDS(CS,4,1);"{2 
CUR.SU)"; 

880 FORI=lTOJ 

890 PRINTPS (0) ;"{3 CUR.SU}"; 
900 NEXT 
910 NEXT 
920 RETURN 

930 REM DRAW TELEPORTER 
940 X«INT (RND (0) *38) 
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950 

Y=INT(RND(0)*23)+1 

1280 

RETURN 

1700 

GOSUB1290:X=5:GOSUB4 80 

960 

IF(PEEK(55296+Y*40+X) 

1290 

REM SELECT DEPRESSION OR 

1710 

GOSUB930 


AND15) O4THEN930 


MOUND 

1720 

RETURN 

970 

IF(PEEK(55296+Y*40+ 

1300 

IFRND(0)<.5THENC$="{BLUE) 

1730 

9 


X+l) AND15) O4THEN930 


{LT.BLUE}{GRAY1>{CYAN }" 

1740 

REM OPEN 

980 

IF(PEEK(55296+Y*40+X+ 


:GOTO1320 

1750 

SYS2627 


40) AND15) O4THEN930 

310 

C$="{GRAY3){GRAY1} 

1760 

GOSUB930 

990 

IF(PEEK(55296+Y*40+X+ 


{WHITE}{GRAY2)" 

1770 

RETURN 


41 ) AND15) O4THEN930 

1320 

RETURN 

1780 

9 

1000 

REM ENTER HERE FOR SET 

1330 

REM BEEP 

1790 

REM LATTICE 


LOCATION 

1340 

POKE54272,0:POKE54273, 

1800 

SYS2627 

1010 

POKE1024+Y*40+X,102 


200 

1810 

PRINT"{HOME){CUR.GIU}"; 

1020 

POKE1024+Y*40+X+1,102 

1350 

POKE54277,0:POKE54278, 

1820 

F0RI=1T012:PRINT"{CUR. 

1030 

POKE1024+Y*40+X+40,102 


244 


DES)";:T=7 

1040 

POKE1024+Y*40+X+41,102 

1360 

POKE54276,33:FORI= 

1830 

IF(IAND1)=0THENPRINT"{3 

1050 

POKE55296+Y*40+X,7 


1TO100:NEXT 


CUR.DES)";: T=6 

1060 

POKE55296+Y*40+X+1,7 

1370 

POKE54276,32 

1840 

FORJ-1TOT 

1070 

POKE55296+Y*40+X+40,7 

1380 

RETURN 

1850 

IFRND(0)<.5THENPRINT" 

1080 

POKE55296+Y*40+X+41,7 

1390 

REM TOGGLE MENU ON/OFF 


{BLUE){SHA) {LT.BLUE){SH 

1090 

M-1024+Y*40+X 

1400 

IF MO-ITHENMO-O: SYS 


H) {CUR.GIU) {2 CUR.SIN) 

1100 

L=M AND 255 :H=INT 


2633:RETURN 


{GRAY1 ) {SH I) {CYANUSH P) 


(M/256) 

1410 

GOSUB1130 


{CUR.SU)";:GOTO1870 

1110 

POKE2639,L:POKE2640,H 

1420 

RETURN 

1860 

PRINT"(GRAY2) {SHA) 

1120 

RETURN 

1430 

REM DIAMONDS 


{GRAY1){SH H) {CUR.GIU) {2 

1130 

REM DISPLAY MENU 

1440 

SYS2627 


CUR.SIN){GRAY3){SH I) 

1140 

MO=l 

1450 

POKE781,12:POKE782, 6: 


{GRAY2) {SH P){CUR.SU)" ; 

1150 

GOSUB1240 


POKE783,0:SYS65520 

1870 

PRINT" {4 CUR. DES ) " ; 

1160 

PRINT"{HOME}{CUR.GIU} 

1460 

GOSUB1290 

1880 

NEXT 


(ORANGE) (CUR.D ES)(RVS 

1470 

X=2:GOSUB480 

1890 

IFI=12THEN1920 


ON)(CBM K}F1 GENERATE 

1480 

POKE781,12:POKE782, 22 : 

1900 

PRINT"{CUR.GIU){3 CUR. 


SELECTED TERRAIN ( RVS OFF ) 


POKE783,0:SYS65520 


SIN}"; 


f CBM K} " 

1490 

GOSUB1290 

1910 

IF(IAND1)=0THENPRINT"{3 

1170 

PRINT"(CUR.DES}{RVS ON ) 

1500 

X=2:GOSUB480 


CUR.DES)"; 


{CBM K)F3 IN CREASE 

1510 

POKE781,6:POKE782,14 : 

1920 

NEXT 


SELECTED TERRAIN {RVS OFF) 


POKE783,0 :SYS65520 

1930 

GOSUB930 


{CBM K ) " 

1520 

GOSUB1290 

1940 

RETURN 

1180 

PRINT"{CUR.DESHRVS ON} 

1530 

X-2:GOSUB480 

1950 

REM RANDOM 


{CBM K}F4 DECREASE 

1540 

POKE781,18:POKE782,14 : 

1960 

SYS2627 


SELECTED TERRAIN {RVS OFF) 


POKE783,0 :SYS65520 

1970 

N=RND(0)/1.5 


{CB M K ) " 

1550 

GOSUB1290 

1980 

PRINT"{HOME) {3 CUR.GIU)"; 

1190 

PRINT"{CUR.DES}{RVS ON ) 

1560 

X=2:GOSUB480 

1990 

FORK-1T07:PRINT" 


{CBM K}F5 MENU ON/OFF{14 

1570 

X=19:Y=12:GOSUB1000 


{CUR.DES)";:T=5 


SPC) {RVS OFF) {CBM K)" 

1580 

RETURN 

2000 

IF(KAND1)-OTHENPRINT"{3 

1200 

PRINT"{CUR.DES){RVSON) 

1590 

REM CYCLONE 


CUR.DES }"; : T=4 


{CBM K)F7 START BATTLE 

1600 

SYS2627 

2010 

FORL=lTOT 


{13 SPC) {RVS OFF) 

1610 

POKE781,3:POKE782,1: 

2020 

IFRND(0)>NTHENPRINT" 


{CBM K ) " 


POKE783,0 :SYS65520 


{CUR.SU){6 CUR. DES)"; 

1210 

PRINT"(CUR.DES}{RVS ON ) 

1620 

GOSUB12 90:X=1:GOSUB480 


:GOTO2050 


{CBM K)F8 RETURN TO TITLE 

1630 

POKE781,3:POKE782, 33: 

2030 

GOSUB1290 


SCREEN {3 SPC ) {RVS OFF ) 


POKE783,0 :SYS65520 

2040 

X-1:GOSUB480 


{CBM K ) " 

1640 

GOSUB12 90 :X=1:GOSUB4 80 

2050 

PRINT"{CUR.GIU){2 CUR. 

1220 

PRINT" {CUR. DES ) {CBM C ) {RVS 

1650 

POKE781,21:POKE782,33 : 


DES)"; 


ON) {28 CBM I ) {RVS OFF) 


POKE783,0:SYS65520 

2060 

NEXT 


{CBM V ) " 

1660 

GOSUB1290:X=1:GOSUB480 

2070 

PRINT" (2 CUR.GIU}"; 

1230 

RETURN 

1670 

POKE781,21:POKE782, 1 : 

2080 

IF(KAND1)“OTHENPRINT"{3 

1240 

REM CLR LOGIC AL LINES 


POKE783,0:SYS65520 


CUR.DES)"; 

1250 

F0RI=217T0242 

1680 

GOSUB1290:X=1:GOSUB480 

2090 

NEXT 

1260 

POKEI,PEEK(I)OR128 

1690 

POKE781,12:POKE782,5 : 

2100 

GOSUB930 

1270 

NEXT 


POKE783,0:SYS65520 

2110 

RETURN 
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2120 REM QUADRATE 
2130 SYS2627 

2140 POKE781,7:POKE782,2: 

POKE783,0 :SYS65520 
2150 GOSUB1290:X=INT(RND(0) 

*3)+1 :IFX<3THENF0RI=1T03- 
X:PRINT"{3 CUR.DES}"; :NEXT 
2160 GOSUB480 

2170 POKE781,17:POKE782,20 : 

POKE783,0 :SYS65520 
2180 GOSUB1290:IFX<3THEN 

F0RI=1T03-X:PRINT"{3 CUR. 
DESI";:NEXT 
2190 GOSUB480 
2200 POKE781,5:POKE782,2 
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OA 

A2 

02 

20 

1A 

OF 

A9 

FE 

1699:20 

57 

OE 

20 

6E 

11 

A9 

40 

BA 

12F1:20 

E1 

FF 

FO 

FB 

A9 

OF 

8D 

DF 

14C9:08 

8D 

D8 

OA 

A9 

F7 

8D 

D9 

37 

16A1:8D 

D8 

OA 

A9 

01 

8D 

D9 

OA 

A2 

12F9:18 

D4 

60 

A9 

13 

20 

D2 

FF 

C4 

14D1:OA 

A2 

03 

20 

1A 

OF 

A9 

10 

7A 

16A9:A2 

06 

AO 

00 

20 

6D 

OF 

A9 

3B 

1301 :A9 

11 

20 

D2 

FF 

A9 

9C 

20 

71 

14D9:8D 

D8 

OA 

A9 

EF 

8D 

D9 

OA 

4E 

16B1:02 

8D 

D9 

OA 

A2 

06 

AO 

01 

8D 

1309:D2 

FF 

AO 

OC 

A2 

OD 

A9 

DB 

E5 

14E1:A2 

04 

20 

1A 

OF 

A9 

20 

8D 

EE 

16B9:20 

6D 

OF 

A9 

04 

8D 

D9 

OA 

E1 

1311:20 

D2 

FF 

A9 

CO 

20 

D2 

FF 

C2 

14E9:D8 

OA 

A9 

DF 

8D 

D9 

OA 

A2 

BE 

16C1:A2 

06 

AO 

02 

20 

6D 

OF 

A9 

73 

1319:A9 

CO 

20 

D2 

FF 

CA 

DO 

EE 

31 

14F1:05 

20 

1A 

OF 

A9 

OA 

8D 

01 

6A 

16C9:08 

8D 

D9 

OA 

A2 

06 

AO 

03 

AA 

1321 :A9 

DB 

20 

D2 

FF 

A2 

OD 

A9 

92 

14F9:D4 

A2 

00 

A9 

00 

9D 

6D 

OA 

2B 

16D1:20 

6D 

OF 

A9 

10 

8D 

D9 

OA 

5A 

1329:DD 

20 

D2 

FF 

A9 

20 

20 

D2 

81 

1501:E8 

EO 

34 

DO 

F8 

A2 

00 

A9 

67 

16D9:A2 

06 

AO 

04 

20 

6D 

OF 

A9 

AB 

1331:FF 

A9 

20 

20 

D2 

FF 

CA 

DO 

C4 

1509:01 

9D 

A9 

OA 

E8 

EO 

2B 

DO 

E2 

16E1:20 

8D 

D9 

OA 

A2 

06 

AO 

05 

DO 

1339:EE 

CO 

01 

FO 

08 

A9 

DD 

20 

F8 

1511:F8 

A9 

FF 

8D 

Al 

OA 

8D 

A2 

ED 

16E9:20 

6D 

OF 

A9 

80 

8D 

D8 

OA 

F3 

1341:D2 

FF 

88 

DO 

C7 

A9 

9D 

20 

2F 

1519:0A 

8D 

A3 

OA 

8D 

A4 

OA 

8D 

61 

16F1:A9 

01 

8D 

D9 

OA 

A2 

07 

AO 

OC 

1349:D2 

FF 

A9 

DD 

20 

D2 

FF 

A9 

E1 

1521 :A5 

OA 

8D 

A6 

OA 

8D 

A7 

OA 

9C 

16F9:00 

20 

6D 

OF 

A9 

02 

8D 

D9 

17 

1351:9D 

20 

D2 

FF 

A9 

94 

20 

D2 

5B 

1529:8D 

A8 

OA 

8D 

D4 

OA 

8D 

D5 

1E 

1701 :OA 

A2 

07 

AO 

01 

20 

6D 

OF 

3A 

1359:FF 

A9 

20 

20 

D2 

FF 

A9 

13 

EC 

1531 :OA 

20 

OF 

12 

20 

A4 

OB 

A9 

BE 

1709:A9 

04 

8D 

D9 

OA 

A2 

07 

AO 

E5 

1361:20 

D2 

FF 

60 

AO 

00 

B9 

28 

F2 

1539:FF 

8D 

15 

DO 

AD 

6F 

OA 

FO 

A6 

1711:02 

20 

6D 

OF 

A9 

08 

8D 

D9 

49 

1369:04 

99 

00 

CO 

B9 

28 

D8 

99 

BD 

1541 :OB 

CE 

6B 

OA 

FO 

03 

4C 

54 

33 

1719 :OA 

A2 

07 

AO 

03 

20 

6D 

OF 

62 

1371:00 

C4 

B9 

28 

05 

99 

00 

CI 

D2 

1549:14 

4C 

60 

17 

AD 

70 

OA 

FO 

42 

1721:A9 

10 

8D 

D9 

OA 

A2 

07 

AO 

01 

1379 :B9 

28 

D9 

99 

00 

C5 

B9 

28 

OE 

1551 :OB 

CE 

6C 

OA 

FO 

03 

4C 

54 

63 

1729:04 

20 

6D 

OF 

A9 

20 

8D 

D9 

C2 

1381:06 

99 

00 

C2 

B9 

28 

DA 

99 

FA 

1559:14 

4C 

43 

17 

20 

98 

OB 

20 

14 

1731 :OA 

A2 

07 

AO 

05 

20 

6D 

OF 

8A 

1389:00 

C6 

B9 

28 

07 

99 

00 

C3 

7D 

1561:DD 

12 

20 

AD 

OB 

20 

B7 

OB 

31 

1739:20 

E4 

FF 

C9 

DI 

FO 

3A 

4C 

60 

1391:B9 

28 

DB 

99 

00 

C7 

88 

DO 

B4 

1569:20 

78 

10 

20 

AC 

11 

A 2 

06 

BA 

1741:3D 

15 

20 

CD 

12 

A2 

OE 

20 

8B 

1399:CD 

60 

AO 

00 

B9 

00 

CO 

99 

BB 

1571:20 

41 

OC 

A2 

07 

20 

41 

OC 

EE 

1749:A7 

12 

AO 

OE 

A2 

00 

18 

20 

2A 

13A1:28 

04 

B9 

00 

C4 

99 

28 

D8 

C9 

1579:A9 

01 

8D 

D8 

OA 

A9 

FE 

8D 

7A 

1751:F0 

FF 

A9 

FD 

AO 

OA 

20 

1E 

98 

13A9:B9 

00 

CI 

99 

28 

05 

B9 

00 

47 

1581:D9 

OA 

A2 

00 

20 

EO 

OC 

20 

2C 

1759 : AB 

20 

B8 

12 

4C 

7A 

17 

20 

38 

13B1:C5 

99 

28 

D9 

B9 

00 

C2 

99 

BO 

1589:88 

OE 

20 

57 

OE 

A9 

40 

8D 

1A 

1761:CD 

12 

A2 

05 

20 

A7 

12 

AO 

04 

13B9:28 

06 

B9 

00 

C6 

99 

28 

DA 

74 

1591:DA 

OA 

AO 

06 

20 

A8 

10 

A9 

8D 

1769:OE 

A2 

00 

18 

20 

FO 

FF 

A9 

37 

13C1:C0 

CO 

BO 

OC 

B9 

00 

C3 

99 

3E 

1599:80 

8D 

DA 

OA 

AO 

07 

20 

A8 

6D 

1771 :OA 

AO 

OB 

20 

1E 

AB 

20 

B8 

C8 

13C9:28 

07 

B9 

00 

C7 

99 

28 

DB 

CD 

15A1:10 

A9 

02 

8D 

D8 

OA 

A9 

FD 

97 

1779:12 

A9 

00 

8D 

15 

DO 

20 

CD 

ED 

13D1:88 

DO 

C9 

60 

A9 

00 

8D 

17 

2F 

15A9:8D 

D9 

OA 

A2 

01 

20 

EO 

OC 

D2 

1781:12 

60 

FF 

00 

00 

00 

00 

00 

DO 

13D9:D0 

8D 

1D 

DO 

8D 

1B 

DO 

8D 

84 

15B1:20 

88 

OE 

20 

57 

OE 

A9 

40 

58 










13E1:00 

D4 

8D 

05 

D4 

8D 

07 

D4 

FE 

15B9:8D 

DA 

OA 

AO 

06 

20 

A8 

10 

BE 
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13E9:8D 

OC 

D4 

A9 

OA 

8D 

01 

D4 

6C 

15C1:A9 

80 

8D 

DA 

OA 

AO 

07 

20 

41 










13F1:A9 

20 

8D 

04 

D4 

A9 

F2 

8D 

A7 

15C9:A8 

10 

A9 

04 

8D 

D8 

OA 

A9 

4F 










13F9:06 

D4 

A9 

80 

8D 

OB 

D4 

8D 

65 

15D1:FB 

8D 

D9 

OA 

A2 

02 

20 

EO 

77 










1401:12 

D4 

A9 

FA 

8D 

OD 

D4 

A9 

40 

15D9: OC 

20 

88 

OE 

20 

57 

OE 

A9 

28 










1409 :FF 

8D 

OE 

D4 

A9 

FF 

8D 

OF 

1B 

15E1:40 

8D 

DA 

OA 

AO 

06 

20 

A8 

91 










1411 :D4 

A9 

31 

8D 

13 

D4 

A9 

F6 

43 

15E9:10 

A9 

80 

8D 

DA 

OA 

AO 

07 

B6 










1419:8D 

14 

D4 

A9 

07 

8D 

25 

DO 

CB 

15F1:20 

A8 

10 

A9 

08 

8D 

D8 

OA 

25 










1421 :A9 

02 

8D 

26 

DO 

A9 

OE 

8D 

89 

15F9:A9 

F7 

8D 

D9 

OA 

A2 

03 

20 

47 










1429:2D 

DO 

A9 

05 

8D 

2E 

DO 

A9 

12 

1601:E0 

OC 

20 

88 

OE 

20 

57 

OE 

DA 










1431:FF 

8D 

1C 

DO 

A9 

22 

8D 

F8 

37 

1609 :A9 

40 

8D 

DA 

OA 

AO 

06 

20 

78 










1439:07 

8D 

F9 

07 

8D 

FA 

07 

8D 

EB 

1611:A8 

10 

A9 

80 

8D 

DA 

OA 

AO 

5F 










1441:FB 

07 

8D 

FC 

07 

8D 

FD 

07 

1C 

1619:07 

20 

A8 

10 

A9 

10 

8D 

D8 

68 










1449:A9 

09 

8D 

6B 

OA 

8D 

6C 

OA 

5A 

1621 :OA 

A9 

EF 

8D 

D9 

OA 

A2 

04 

D3 
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M olto spesso in un nego¬ 
zio, ristorante od hotel, la 
nostra attenzione viene 
catturata da qualche 
pannello pubblicitario sul quale scor¬ 
re da sinistra verso destra un mes¬ 
saggio elettronico. L'efficacia di que¬ 
sti accessori è notevole, come il loro 
costo. 

Con Electronic Billboard possiamo 
usare il 64 in un modo molto simile per 
visualizzare fino a 240 linee di mes¬ 
saggi, in caratteri di dimensioni extra, 
a scorrimento fluido. Il messaggio si 
può digitare o caricare da un file gene¬ 
rato con SpeedScript o qualsiasi altro 
word processor. 


Come iniziare 

Electronic Billboard si compone di tre 
programmi, dei quali il primo è scritto 
in BASIC. Trascritto il listato per 
mezzo del Correttore Automatico (si 
da non introdurre errori di battitura) 
salvate il file su disco con nome 
BILLBOARD.BAS. 

L’inserimento dei due programmi (in 


Trasformiamo il video in un 
pannello pubblicitario a 
scorrimento verticale. 

Edward Sweierk 


Infomation Center 

ntrcaIlo 
Pippo 


blllbo*ri 
Marcai lo 
Pippo 


blllbo*ri 
Marca Ho 


linguaggio macchina) restanti richie¬ 
de l’utilizzo del MLX, che trovate pure 
in questa rivista. I valori di cui dovrete 
specificatamente rispondere sono i 
seguenti: 

PER BILLBOARD.ML 


INDIRIZZO INIZIALE :033C 


INDIRIZZO FINALE: 03AB 

PER BILLBOARD.CHAR 
INDIRIZZO INIZIALE: C000 
INDIRIZZO FINALE: C807 

Ad operazione completata, salvate 
questi file sul disco che contiene 
BILLBOARD.BAS, usando i nomi 
BILLBOARD.ML e BILLBOARD.CHA 
R, rispettivamente. 

Ora, per incominciare a comporre 
pannelli e messaggi, caricate ed av¬ 
viate BILLBOARD.BAS. 

Composizione di pannelli 
Prima di poter mettere in funzione 
Electronic Billboard bisogna digitare il 
messaggio che si intende visualizza¬ 
re: possiamo inoltrarlo direttamente 
nel programma oppure utilizzare un 
word processor per generare un file di 
testo, ed azionare il programma solo 
in un secondo tempo. Quest’ultimo 
approccio è più adatto per messaggi 
di lunghezza considerevole: inoltre un 
messaggio salvato su disco tramite 
word processor rimane disponibile 
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per composizioni future. 

Per inviare il messaggio direttamente 
ad Electronic Billboard scegliamo 
l’opzione di menu 2-lnserimento 
messaggio. Possiamo scrivere un 
massimo di 99 linee di 35 caratteri 
ciascuna. 

La numerazione delle righe è automa¬ 
tica, l'utente deve soltanto digitare il 
testo e premere RETURN per passa¬ 
re alla linea successiva. E’ consentito 
separare messaggi singoli ponendo 
un carattere di spaziatura od un segno 
meno (-) su una linea a parte. Final¬ 
mente digitiamo un asterisco (*) nel¬ 
l’ultima linea e confermiamo con 
RETURN. 

Dopo la stampa dell'intestazione per il 
pannello, il messaggio incomincerà a 
scorrere dalla parte inferiore dello 
schermo verso l'alto. Premendo Q 
blocchiamo la visualizzazione e tor¬ 
niamo allo schermo precedente. Per 
generare un messaggio con un word 
processor dobbiamo utilizzare un 
prodotto che salvi i file in formato 
Commodore ASCII (sequenziale). 
L’inserimento del testo deve avvenire 
in un modo simile a quello appena 
descritto: digitiamo fino a 38 caratteri 
per linea terminando con RETURN; il 
segno meno separa i messaggi men¬ 
tre un asterisco indica che non i mes¬ 
saggi sono esauriti (Electronic Bill¬ 
board non può accettare più di 240 
linee di testo). 

Infine salviamo il file con il nome 
BILLBOARD.DATA. Pur non salvan¬ 
do i file in formato Commodore ASCII, 
SpeedScript può venire utilizzato per 
scrivere il testo. Per fare ciò è suffi¬ 
ciente collocare il comando di format¬ 
tazione seguente al principio del file. 

I0r38t0b500p500 

SpeedScript stamperà una pagina di 
28 colonne priva di margine superiore 
o inferiore, lunga 500 linee: in questo 
modo il testo non presenterà interru¬ 
zioni. 

Anziché premere RETURN al termine 
di ogni linea, confermeremo solo a 
fine messaggio, mentre segno meno 


ed asterisco mantengono la funzione 
già illustrata. 

Inserito il messaggio, stampiamo il file 
su disco premendo CTRL-SHIFT-P e 
rispondendo con D (disk) alla richiesta 
successiva. Ricordiamo ancora una 
volta di utilizzare il nome 
BILLBOARD.DATA per salvare il file. 
Dopo il salvataggio possiamo abban¬ 
donare il word processor e caricare 
Electronic Billboard. Scegliamo l'op¬ 
zione 1 -Carica messaggio da disco e, 
dopo il caricamento in memoria, ve¬ 
dremo comparire il messaggio. 

Personalizzazione del programma 
Electronic Billboard è stato scritto così 
da poter essere utilizzato per gli scopi 
più disparati. Se intendete usare il 
display per una festa nel giorno di 
Halloween, potete stampare il mes¬ 
saggio in colore arancio su nero ed 
intestare il pannello in modo adatto 
all’occasione. Le variabili di colore 
risiedono alle linee 20-60 e possono 
venire modificate con i valori nel 
campo 0-15. L’intestazione, attual¬ 
mente definita come Information 
Center, si trova alla linea 70. Ricorda¬ 
te, durante l’inserimento dell'intesta¬ 
zione, di non usare più di 70 caratteri 
e di chiudere il testo tra vigolette. 

La velocità di scorrimento è controlla¬ 
ta dalla variabile SP alla linea 80. 
Sono validi i valori nel campo 1-10 
(1=velocità massima, 10=velocità 
minima). 

Conclusione 

Un messaggio generato per mezzo di 
un wp può causare l’errore “file too 
large". Se ciò dovesse verificarsi, 
abbreviate il file oppure incrementate 
il valore della variabile MX nella linea 
90. La regolazione di detta varabile 
può richiedere qualche esperimento: 
un valore troppo alto può causare 
l'errore di OUT OF MEMORY. 
Electronic Billboard utilizza le locazio¬ 
ni di memoria 829-933 per il linguag¬ 
gio macchina, 51200-53247 per la 
RAM di schermo, e 61440-63487 per 
la RAM caratteri. I programmi che si 
servono di tali locazioni, come pure 


certune cartucce a caricamento velo¬ 
ce, non funzionano con il programma. 

Listing BASIC 

10 REM COPYRIGHT 1990 

COMPUTE! PUBLICATIONS,INC. 

- ALL RIGHTS RESERVED 
15 PRINT"{CLR}{LT.BLUE }" 

:POKE53280,14:POKE53281,6 
20 Cl-0 : REM BACKGROUND COLOR 
30 C2 = 3 :REM SCROLLING TEXT 

COLOR 

40 C3=6 : REM BORDER COLOR 

50 C4«6 : REM HEADING BACK 
GROUND COLOR 

60 C5=3 : REM HEADING TEXT 

COLOR 

70 DATA"{SH I INFORMATION 

(SH C}ENTER" 

80 SP=5:REM SCROLL SPEED 

90 MX=240:REM MAXIMUM DATA 

FILE LENGTH 

100 DF$="BILLBOARD.DATA":REM 
DATA FILE NAME 
110 PRINT"{CUR.GIU}PLEASE 

WAIT{CUR.GIU}":AD=828:F$=" 
BILLBOARD.ML":GOSUB830: 
POKE872,(SP+3)*5 
120 AD=61440:F$="BILLBOARD 

.CHAR":GOSUB830 

130 DIMS1S(MX),S2$(MX):R1$=" 

{RVS ON ) " :R2$=" {RVS OFF ) " 
:Sl%=SP*3:S2%=SP*5-5 
140 SP$="{39 SPC)":PRINTCHR$ 

(14)CHR$(8) 

150 PRINT"{CLR}{CUR.GIU} 

"TAB (5) " {SH E) {SH L} {SH 
EUSH C} {SH T> {SH RUSH 
0|(SH N){SH I){SH Ct {SH 
B} {SH I) {2 SH L) (SH B) {SH 
0} {SH A) {SH R} {SH D}": 
PRINT" {SH COPYRIGHT 1990 
{SH C} {SH 0){SH M{ {SH P) 
{SH U} {SH T} {SH E) ! (SH 
P}UBL." 

155 PRINTTAB(5) "{SH A}LL {SH 
R}IGHTS (SHR)ESERVED 
{CUR.GIU}" 

156 PRINT" (1) {SH G}ET 
MESSAGE DATA FROM DISK 
FILE" 

160 PRINT" (2) (SHT)YPE INA 
MESSAGE": INPUT"{CUR. 

GIU} {SH Y}OUR CHOICE";CH$ 
170 IFCH$o"l”ANDCH$<>"2" 
THEN150 

180 IFCH$="1"THENGOSUB330 
190 IFCH$="2"THENGOSUB410 
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200 

PRINT"(CUR.GIU}{SHP)RESS 

430 

PRINT"EACH MESSAGE.(SHE} 


252:POKE53272, 44: 


{SH R}(SH E}{SH T}{SH U) 


NTER * TO END INPUT. 


POKE648,200 


{SH R}{SH N} TO START 


(CUR.GIU}" 

700 

POKE53265,PEEK(53265)AND 


MESSAGE SCROLL":PRINT"OR 

440 

N=N+1:IFNClOTHENPRINT""; 


247:PRINTCHRS(147):POKE 


ENTER {SH Q} TO QUIT"; 

450 

IFN>99THENS1$(N)="-":N= 


808,234:RETURN 

210 

INPUTCHS : IFCH$="Q"OR 


N+l:RETURN 

710 

F0RI-52224T052672:POKEI, 


CHS-"{SH Q}"THENSYS2048 

460 

NNS-STRS(N):PRINTRIGH 


255 :NEXT:FORI=0TO7:POKE 


:END 


T$(NN$,LEN(NN$)-1)":"; 


52216+1,48+I:NEXT:V-53248 

220 

GOSUB690:POKE53280, C3: 


:ZZ$-CHRS(20) 

720 

POKEV+21,127:FORI=39TO 


POKE53281,CI :POKE64 6, C2: 

470 

PS=0:C$="" 


4 6 :POKEV+I,C4:NEXT:FORI- 


GOSUB710 :PRINTCHRS(147) 

480 

PRINTCHRS(166)CHR$(157) ; 


1T015STEP2:POKEV+1,3 6 :NEXT 

230 

FORI=0TO119:POKE55296+I, 

490 

GETA$:IFAS=""OR(A$=CHR$ 

730 

POKEV+29,255 :POKEV+23,255 : 


C5:POKE51200 + 1, 160 :NEXT 


(24)ANDCS-"")THEN4 90 


FORI-OTOl 4 STEP2 :11=24 + 1*24 

240 

L-L+l:AS-S1S(L):B$=S2$(L) 

500 

PRINT" "CHR$(157); 

740 

POKEV+I,11+256*(II>255): 

250 

IFPEEK(198)>OTHENPOKE198 

510 

IFAS-ZZSANDLEN(C$)>0 


NEXT:POKEV+16,96:POKE56 


,0:POKE808,237:POKE648 


THENC$=LEFT$ (CS,LEN (CS) - 


334,PEEK(56334)AND254 


,4 :SYS2048: END 


1):PRINTAS; :PS-PS-1: 

750 

POKE1,PEEK(1)AND251 : READ 

260 

IFL=NTHENL=0:GOTO240 


GOTO480 


N$:NN-LEN(N$):FORX-1 

270 

IFA$="-"THENA$="" 

520 

IFAS-CHRS(24)THENFORZ 


TONN:PS-INT(10-NN/2)+X 

280 

POKE214,23:PRINT:PRINT 


=1T0LEN(CS):PRINTZZ$;: 

760 

SN=INT(PS/3-.3):IFPS-30R 


SP$;:POKE214,23 :PRINT: 


NEXT:GOTO470 


PS=60RPS=90RPS-120RPS- 


PRINTAS;:SYS828 

530 

IFAS-CHRS(13)ANDC$<> 


150RPS=18THENCN-2 

290 

IFA$-""THENFORI=lTOSl% 


""THENPRINTAS;:GOTO570 

770 

IFPS=10RPS=40RPS=70RPS= 


:NEXT 

540 

IF(ASC(A$)AND127) 


1OORPS-130RPS-160RPS- 

300 

POKE214,23:PRINT:PRINT 


<32THEN4 80 


19THENCN-0 


SP$; :POKE214,23:PRINT: 

550 

IFPS>34THEN480 

780 

IFPS=20RPS=50RPS=80RPS= 


PRINTBS; :SYS828 

560 

PRINTAS;:C$=C$+AS: 


110RPS-140RPS-170RPS- 

310 

IFA$=""ANDL>lTHENFORI= 


POKE212,0:PS=PS+1: 


20THENCN-1 


1T0S2%:NEXT:SYS82 8 


GOTO480 

790 

CH=ASC(MIDS(N$,X,1)):IF 

320 

GOTO240 

570 

SIS(N)=C$:IFS1S (N) 


CH>=193ANDCH<=218 

330 

OPEN1,8,2,"0:"+DF$+",S,R 


THENGOTO440 


THENCH-CH-128 :GOT0810 


":PRINT"(CUR.GIU} (SH R} 

580 

IFS1S(N)-"*"THENS1$(N) 

800 

IFCH>=64ANDCH<=90THENCH= 


EADING MESSAGE DATA, 


="-":N=N+l:RETURN 


CH-64 


PLEASE WAIT.(2 CUR.GIU}" 

590 

GOSUB600:GOTO440 

810 

SP-52251+64 *SN+CN:FORI-O 

340 

N=N+1:PRINT"(CUR.SU} (SH 

600 

AS-S1S (N): SIS-"":S2S-"" 


T07:II=PEEK(56320+CH*8+I): 


L}INE";N:IFN>-MXTHEN 


:IFLEN(A$)-0THENRETURN 


POKESP,11:SP-SP+3:NEXTI,X 


PRINT"(CUR.GIU}(SH D}ATA 

610 

FORI-1TOLEN(AS):CH=ASC 

820 

POKE1,PEEK(1)OR4:POKE 


FILE TOO LARGE.":CLOSE1 


(MIDS(AS,I,1) ) 


56334,PEEK(56334)ORI 


:END 

620 

IFCH>32ANDCH<64THENS1$- 


: RETURN 

350 

IFST=64THENCL0SE1: RETURN 


S1S+R1S+CHRS(CH+63)+R2S: 

830 

F$="0:"+F$:A2=INT(AD/256): 

360 

GET#1, A$ :PS=PS+1 : IFASo 


S2S-S2S+R1S+CHRS(CH+ 


A1-AD-A2*256 


CHR$(13)ANDPS<39THEN 


127)+R2S 

840 

T$=F$:ZK-PEEK(53)+2 5 6 * 


C$-C$+A$:GOTO350 

630 

IFCH-650R(CH>66ANDCH 


PEEK(54)-LEN(T$):POKE782, 

370 

IFMID$(CS,LEN(CS) , 1)=" 


<94)THENS1S-S1S+CHRS(CH) 


ZK/256 


"THENCS-LEFTS(C$, LEN 


:S2S-S2S+CHRS(CH-32) 

850 

POKE781,ZK-PEEK (782)*256 


(C$)-l) 

640 

IFCH-66THENS1$=S1$+"B" 


:POKE780,LEN(T$):SYS65469 

380 

SIS (N)=C$:C$="":PS=0: 


:S2S-S2S+CHRS(34) + 

860 

POKE780, 1 :POKE781,8 :POKE 


IFS1$(N)-"-"THENGOTO340 


CHR$(34)+CHRS(20) 


782,0:SYS65466:POKE780,0 

390 

IFS1$(N)="*"THENS1$(N)- 

650 

IFCH>192ANDCH<218THEN 


:POKE781,Al :POKE782,A2 


"-":CLOSEl:N-N+l:RETURN 


S1$=S1S+CHR$(CH): 

870 

SYS65493:IF(PEEK(783) 

400 

GOSUB600:GOTO340 


S2S-S2S+CHRS(CH-32) 


AND1)OR(191ANDST)THEN 

410 

PRINT"(CLR)(CUR.GIU} 

660 

IFCH=32THENS1S=S1$+"": 


PRINT"ERROR LOADING "FS: 


(SHE)NTER MESSAGE TEXT, 


S2S-S2S+" " 


END 


PRESSING(SH R}(SHE}(SHT} 

670 

NEXT: SIS(N)-LEFTS(SPS, 

880 

RETURN 


(SH UUSH R} (SH N}" 


20-LEN(A$)/2)+S1$:S2S 

Listing M.L. 

420 

PRINT" AFTER EACH LINE 


(N)-LEFTS(SPS,20-LEN 


.":PRINT"(CUR.GIU)(SH E} 


(A$)/2)+S2$ 

033C 

:A2 06 86 FB 20 76 03 AD 34 


NTER -ON A SEPARATE LINE 

680 

RETURN 

0344 

: 11 DO 29 F8 18 65 FB 8D 97 


AFTER" 

690 

POKE56576,PEEK(56576) AND 

034C 

: 11 DO 20 67 03 A6 FB CA FE 
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MLX 


LISTATO DI C64 MLX II ESA 


MLX è un programma che permette di introdurre listati 
in linguaggio macchina senza errori, 
per C 64 e C 128 in modo 64. 


Quando bisogna introdurre un pro¬ 
gramma , della nostra rivista scritto in 
linguaggio macchina, bisogna carica¬ 
re e dare il RUN al programma MLX II. 
Gli indirizzi richiesti si possono legge¬ 
re nell'articolo che accompagna il 
programma formato MLX. 

Se siete “digiuni" di linguaggio mac¬ 
china questi indirizzi ( e tutti gli altri 
valori da introdurre ) possono appari¬ 
re strani. Invece questi numeri sono 
ropri del sistema esadecimale a 
ase 16 comunemente usato appunto 
per i programmi in linguaggio macchi¬ 
na. Il sistema esadecimale include i 
numeri da 0 a 9 e le lettere da A a F. 
Dopo aver introdotto l’indirizzo inizia¬ 
le e finale viene offerta l’opzione per 
pulire I’ area di lavoro con tutti zeri. 

A questo punto apparirà sul video il 
menu. 

Per introdurre un programma bisogna 
scegliere la prima opzione cioè: im¬ 
mettere dati. 

Premendo la lettera I verrà richiesto 
l'indirizzo della prima linea. 

Se il programma in parte è stato digi¬ 
tato, bisogna assicurarsi di aver cari¬ 
cato quella parte, scegliere la prima 
opzione e digitare il numero di linea 
della rimanente parte da introdurre. 
Bisogna sempre assicurarsi che l’indi¬ 
rizzo immesso corrisponda a quello 
della linea del listato, altrimenti i dati 
non vengono accettati. 

Per tornare al menu basta premere 
RETURN da qualsiasi opzione. 

Le linee da introdurre sono composte 
da nove cifre, le prime otto sono dati, 
l’ultima è il checksum. Se la linea è 
stata introdotta in modo corretto verrà 
emesso un beep ed il programma 
passerà alla linea successiva, vice¬ 
versa la linea non verrà accettata. 
Altro vantaggio di MLX è quello di non 
dover introdurre il numero di linea. 

Il checksum di MLX è molto potente, 
se si digita AO invece di OA questo 
viene notato ed apparirà il messaggio 
di errore. Al contrario, se si immette 
FF invece di 00 e viceversa, non viene 
notato, per cui questo è l'unico caso 
limite e naturalmente bisogna fare 


attenzione. Per cancellare un errore 
di battitura si deve usare il tasto INST/ 
DEL o il cursore verso sinistra. 

Il tasto RETURN funziona solo prima 
di digitare qualche dato della linea. 

Il tasto CLR/HOME pulisce la linea 
dopo aver visto il messaggio di errore. 
La seconda opzione del menu riguar¬ 
da la visualizzazione dei dati. 
Quando si preme V viene chiesto 
l'indirizzo iniziale: questa opzione 
mostra tutti i dati da tale indirizzo fino 
alla fine della memoria, dopodiché il 
menu viene visualizzato. 

Per fare una pausa durante la visua¬ 
lizzazione dei dati bisogna premere la 
barra spazio, così pure per tornare 
alla visualizzazione. 

Con RETURN si torna al menu. 

Altre due opzioni sono di LOAD e di 
SAVE di un programma. 
Naturalmente è possibile registrare o 
salvare su disco o su nastro. 

Quando si salva un programma biso¬ 
gna sempre usare nomi differenti. 
MLX riporta tutti i messaggi standard 
del Commodore 64. 
ed in più include altri tre messaggi: 

1) INDIRIZZO INIZIALE ERRATO , 
questo significa che il programma che 
si tenta di caricare non inizia all' indi¬ 
rizzo specificato all'inizio quando si è 
fatto girare MLX. 

2) CARICAMENTO FINITO a indiriz¬ 
zo..., questo messaggio significa che 
il programma che si prova di caricare 
finisce prima dell'Indirizzo finale intro¬ 
dotto quando viene dato il RUN. 

3) FINITO ALL' INDIRIZZO FINALE, 
questo messaggio significa che il pro¬ 
gramma che si tenta di caricare finisce 
oltre all'indirizzo finale specificato all¬ 
'inizio. 

Se si incontra uno di questi errori 
bisogna uscire da MLX tornando al 
BASIC, con l’opzione FINE, dare il 
RUN e immettere i giusti indirizzi. 

Se si digita un programma lungo è 
consigliabile salvare, caricare e verifi¬ 
care frequentemente. Per far partire il 
programma digitato su MLX bisogna 
far riferimento aH'articolo del pro¬ 
gramma. 
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10 REM MLX II ESADECIMALE 

P0KE56,50:CLR:DIMIN$, I, J, 
A,B,A$,B$,A(7),N$ 

110 C4=48:C6=16:C7-7:Z2=2: 

Z4=254:Z5=255:Z6=256:Z7=127 
120 FA=PEEK(45)+Z6*PEEK(46) 

:BS=PEEK(55)+Z6*PEEK(56): 
H$=" 01234567-8 9ABCDEF" 
130 R$=CHR$(13):L$="(CUR.SIN}" 

:S$="":D$=CHR$(20):Z$=CHR$ 
(0):TS = "(12 CUR.DES)" 
140 SD-54272:FORI-SDTOSD+23: 
POKE1,0:NEXT:POKESD+2 4,15: 
POKE788,52 

150 PRINT"(CLR}"CHR$(142) 

CHR$(8):POKE53280,15:POKE 
53281,15 

160 PRINT T$" {RED}{RVSON) 

{2 SPC ) ( 8 CBM @ }{2 SPC ) 
"SPC(28) " (2SPC}(RVSOFF)(BL 
UE(MLXII(RED)(RVSON)(2 
SPC)"SPC(28)"(12SPC){BLUE)" 
170 PRINT"(3CUR.GIU){3SPC) 
EDITOR PER IL LINGUAG 
GIOMACCHINA.(3CUR.GIU)" 
180 PRINT"(BLACK)INDIRIZZO 
DI PARTENZA(GRAY1) 
:GOSUB300:SA=AD:GOSUB1040 
:IFFTHEN180 

190 PRINT"(BLACK(INDIRIZZO 
FINALE(GRAY1)";:GOSUB300: 
EA=AD:GOSUB1030:IF F 
THEN190 

200 INPUT"(3CUR.GIU)(BLACK) 
PULISCO L'AREA DILAVORO 
[S/N] f GRAY1}";A$: IF 
LEFTS(A$,1)<>"S"THEN220 
210 PRINT"(2CUR.GIU)(BLUE) 
ATTENDERE.. :FORI=BS 
TO BS+EA-SA+7:POKEI,0 : 
NEXT:PRINT"FATTO!" 

220 PRINTTAB(IO)"(2CUR.GIU) 

(BLACK)(RVSON) MENU 
COMANDI MLX (CUR.GIU) 
(GRAY1)":PRINT T$"(RVS 
ON)I{RVSOFF)MMETTIDATI" 
230 PRINT T$"(RVS ON)V(RVS 
OFF}ISUALIZZA DATI": 
PRINT T$"(RVS ON)L 
(RVS OFF)OAD FILE" 

240 PRINT T$"(RVS ON)S(RVS 
OFF(AVE FILE":PRINT 
T$"(RVSON)F(RVS OFF) 

INE(CUR.GIU)(BLACK)" 

250 GETAS:IFA$=N$ THEN250 
260 A=0:FORI-lTO5:IFAS=MID$ 
("IVLSF",1,1)THENA=1:1=5 
270 NEXT:ON AGOTO700,280 
:GOSUB1060:GOTO250 
280 PRINT"(RVS ON) FINE 

":INPUT"(CUR.GIU}(GRAY1)SEI 
SICURO ?[S/N]";A$:IF 
LEFTS(AS,1)<>"S"THEN220 
290 POKESD + 24,0 : END 

300 IN$=N$:AD=0:INPUTINS: 

IFLEN(INS)<>4THENRETURN 
310 B$=IN$:GOSUB320:AD=A: 
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B$=MID$(IN$,3):GOSUB320:AD= 
AD*256+A:RETURN 
320 A=0:FORJ=lTO2:A$=MID$ 
(B$, J, 1):B=ASC(AS)-C4 + 
<A$>"@")*C7:A=A*C6+B 
330 IF B<0 OR B>15THENAD=0 
:A—1: J-2 

340 NEXT:RETURN 

350 B=INT(A/C6):PRINTMID$ 
(H$,B+l,1);:B=A-B*C6 
:PRINTMIDS(H$,B+l,1); 

: RETURN 

360 A=INT(AD/Z6):GOSUB350 
:A=AD-A*Z 6 :GOSUB350 
:PRINT":"; 

370 CK=INT(AD/Z6):CK=AD- 

Z4*CK+Z5*(CK>Z7):GOTO390 
380 CK=CK*Z2+Z5*(CK>Z7)+A 
390 CK=CK+Z5*(CK>Z5):RETURN 
400 PRINT"{CUR.GIU}INIZIA 

A{GRAY1}";:GOSUB300:IF 
IN$ON$ THEN GOSUB1030 
:IF FTHEN400 
410 RETURN 

420 PRINT"{RVS ON} IMMETTI 
DATI":GOSUB400:IF 
IN$=N$ THEN220 
430 OPEN3, 3 :PRINT 
440 POKE198,0:GOSUB360:IFF 
THEN PRINT IN$:PRINT" 
{CUR.SU}{5 CUR.DES}"; 

450 FORI=0TO24STEP3:B$=S$: 
F0RJ-1T02:IF FTHENBS 
=MIDS(INS, I+J,1) 

460 PRINT"{RVS ON)"B$L$;: 

IF I<24 THEN 
PRINT"(RVS OFF}"; 

470 GETA$:IFA$=N$ THEN470 

480 IF(A$>"/"ANDA5<":")OR 
(A$>"@"ANDA$<"G”) 

THEN540 

490 IFA$=RS AND ((I=0)AND 

( J=1)OR F)THENPRINTBS; 

: J=2:NEXT:1=24 :GOT0550 
500 IFAS-"{HOME}"THEN 

PRINTBS:J=2:NEXT: 1=24 
:NEXT:F=0:GOT04 4 0 
510 IF(A$="{CUR.DES}")ANDF 

THENPRINTBSLS;:GOTO540 
520 IFA$OL$ AND A$<>D$ OR 

((1=0)AND(J=1))THEN 
GOSUB1060:GOTO470 
530 A$=L$+SS+L$:PRINT 

BSL$; :J=2-J:IF J THEN 
PRINTLS;: 1=1-3 

540 PRINTAS;:NEXTJ:PRINTS$; 
550 NEXTI:PRINT:PRINT" 

{CUR.SU}{5 CUR.DES}"; 

:INPUT#3,INS:IFIN$=N$ 
THEN CLOSE3:GOTO220 
560 F0RI-1T025STEP3: 

B$=MID$(INS,I):GOSUB 
320 :IFI<25THEN 
GOSUB380:A(1/3)=A 
570 NEXT: IF AOCK THEN 

GOSUB10 60 :PRINT"{BLACK} 
{RVS ON} ERRORE 
RI IMMETTI LA LINEA 
{GRAY1}":F=1:GOT04 4 0 
580 GOSUB1080:B=BS+AD-SA 

:FOR I=0TO7:POKEB+ 


I,A(I):NEXT 

590 AD=AD+8:IFAD>EA THEN 

CLOSE3:PRINT"{CUR.GIU} 
{BLUE}** FINE IMMIS 
SIONE **{BLACK}{2 
CUR.GIU}":GOTO700 
600 F=0:GOTO440 

610 PRINT"{CLR}{CUR.GIU} 

{RVS ON) VISUALIZZA 
DATI » :GOSUB400:IF 
IN$=N$THEN220 

620 PRINT"{CUR.GIU}{BLUE} 
PREMI :{RVS ON}SPACE 
{RVS OFF){2 SPC}PAUSA, 

{2 SPC){RVS ON}RETURN 
(RVS OFF} 

{2SPC}STOP{GRAVI}{CUR.GIU}* 
630 GOSUB360:B=BS+AD-SA 

:FORI=BTOB+7:A-PEEK(I) 

:GOSUB350 

:GOSUB380:PRINT SS; 

640 NEXT:PRINT"{RVSON}";:A=CK 

:GOSUB350:PRINT 

650 F=1:AD=AD+8:IFAD>EATHEN 

PRINT"{CUR.GIU}{BLUE}** 
FINE DATI **":GOTO220 
660 GETA$:IFA$=R$THEN 
GOSUB1080:GOTO220 
670 IFA$=S5THENF=F+1:GOSUB1080 
680 ONFGOTO630,660,630 
690 PRINT"{CUR.GIU}{RVSON} 
LOAD DATI":OP=l 
:GOTO710 

700 PRINT"{CUR.GIU}{RVSON} 
SAVE FILE ":OP=0 
710 IN$=NS:INPUT"{CUR.GIU} 

NOME FILE{GRAY1}";IN$ 

: IF IN$=N$ THEN220 
720 F=0:PRINT"{CUR.GIU){BLACK} 

{RVS ON}N{RVSOFF}ASTRO 
O {RVS ON}D{RVS OFF}IS 
CO: {GRAY1}"; 

730 GETA$:IFA$="N"THEN 

PRINT"T{CUR.GIU}":GOTO880 
740 IFA$O"D"THEN730 

750 PRINT"D{CUR.GIU}" 

:OPEN15,8,15,"I0:":B=EA 
-SA :IN$="0:"+IN$:IFOP 
THEN810 

760 OPEN1,8,8,INS+", P, W" 

:GOSUB860:IF A THEN220 
770 AH=INT(SA/256):AL=SA- 
(AH*256) 

:PRINT#1,CHRS(AL);CHR$(AH); 
780 FORI=0TOB:PRINT#1,CHRS (PEEK 

(BS+I)); :IF ST THEN800 
790 NEXT:CLOSE1:CLOSE15:GOTO940 
800 GOSUB1060:PRINT"{CUR.GIU} 
{BLACK}ERRORE DURANTE 
IL SAVE:{GRAY1}" 
:GOSUB860:GOTO220 
810 OPEN1,8,8,IN$+",P,R" 
:GOSUB860:IFATHEN220 
820 GET#1,AS,BS:AD=ASC(A$ 

+ZS)+256*ASC(B$+Z$):IF 
ADOSA THENF=1 :GOTO850 
830 FORI=OTOB:GET#1,AS:POKE 

BS+I,ASC (A$+Z$) : IF ( IOB) 
AND ST THENF=2:AD=I 
840 NEXT:IF ST<>64 THENF=3 
850 CLOSE1:CLOSE15:ON ABS 


860 

870 

880 

890 


900 

910 

920 

930 

940 

950 

960 

970 


980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 
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(F>0)+1GOTO960,970 
INPUTI15,A,A$:IF AHEN 
CLOSE1:CLOSE15:GOSUB1060 
:PRINT"{RVSON}ERROR:"A$ 
RETURN 

POKE183,PEEK(FA+2):POKE187, 
PEEK(FA+3):POKE188,PEEK 
(FA+4):IFOP=0THEN920 
SYS 63466:IF(PEEK(783) 
AND1)THEN GOSUB1060 
:PRINT"{CUR.GIU}{RVSON} 
FILE NOT FOUND 
":GOTO690 

AD=PEEK(829)+256*PEEK 
(830) :IF ADOSATHENF=l 
:GOTO970 

A=PEEK(831)+256*PEEK(832)- 
1:F=F-2*(A<EA)- 
:AD=A-AD:GOTO930 
A=SA:B=EA+1:GOSUB1010 
.•POKE780, 3:SYS63338 
A=BS:B=BS+(EA-SA)+1 : 
GOSUB1010:ON OP 
GOTO950:SYS 63591 
GOSUB1080:PRINT"{BLUE} 

** SAVE COMPLETATO **" 
:GOTO220 

POKE147,0:SYS 63562 
:IF ST>0 THEN970 
GOSUB1080:PRINT"{BLUE} 

** LOAD COMPLETATO **" 
:GOTO220 

GOSUB1060:PRINT"{BLACK} 
{RVS ON}ERRORE DURANTE 
IL LOAD:{CUR.GIU}{GRAY 
1}":ON FGOSUB980,990, 
1000 :GOTO220 
PRINT"INDIRIZZO DI 
PARTENZA ERRATO (";:GO 
SUB360:PRINT")":RETURN 
PRINT"LOAD FINITO” A: AD= 
SA+AD:GOSUB360:PRINT 
D$: RETURN 

PRINT"FINITO ALL'INDI 
RIZZO FINALE":RETURN 
AH-INT(A/256):AL=A- 
(AH*256) 

:POKE193,AL :POKE194, AH 
AH=INT(B/256):AL=B- 
(AH*256) 

:POKE174,AL:POKE175,AH 
: RETURN 

IF AD<SA OR AD>EA 
THEN1050 
IF(AD>511 AND 
AD<40960) OR 
(AD>49151 AND AD<53248) 
THENGOSUB1080 :F=0: RETURN 
GOSUB1060:PRINT"{RVSON} 
INDIRIZZO NON VALIDO 
{CUR.GIU}{BLACK}":F=1 
: RETURN 

POKESD+5,31:PCKESD+6,208:PCKE 
SD,240:PCKESD+1,4:PCKESD+4,33 
FORS=lTO100:NEXT:GOTO1090 
POKESD+5,8:POKESD+6,240 
:POKESD,0:POKESD+l, 90 
:POKESD+4,17 
FORS=l TO100:NEXT 
:POKESD+4,0:POKESD, 0: 
POKESD+1,0:RETURN 
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DEL TOTOCALCIO 


SUL MEDESIMO ARGOMENTO 


Risorse per la didattica 

IMPARA CON IL 
COMMODORE 64 
Risolvi i tuoi esercizi con il 
computer 

Cod.CC958 pp.334 L.24.000 

Libro con floppy disk 5 1/4" 

David Lawrence 
TECNICHE DI 
PROGRAMMAZIONE SUL 
COMMODORE 64 

Cod.575D pp.176 L16.500 


AA. W. 

GRAFICA E SUONO 
Per il C64 ■ CI28 ■ 

C64 Personal Computer 

Cod.CC658 pp.394 L.35.000 

Libro con floppy disk 5 1/4" 

Czes Kosniowskl 

MATEMATICA E 
COMMODORE 64 
Cod.570D pp.160 L.26.500 

Libro con cassetta per C64 


Q jackson 


libri del Gruppo Editoriale Jackson 
sono in vendita presso 
le migliori librerie e computershop. 


Riparare da soli 
il proprio C64 


^ 0o ^Uuapa^ a d r r^O' 

«fe* a w£ e J5SS5 alte 
tecnte^® , qoo 

ssaSiii 


a*"* 1 ' J* c °0 

"SS»;sSffrffi?.» 


M. England D.Lawrence 

il testo permette di acquisire 
senza fatica le tecniche avan¬ 
zate di programmazione in As- 
semblersuC64. Il dischetto con¬ 
tiene i programmi del testo. 
Cod.572D pp.208 L.35.000 
Libro con floppy disk S 1/4" 


Totomac 

Dedicato sia ai sistemisti che ai 
giocatori occasionali, il testo af¬ 
fronta in modo semplice ed effi¬ 
cace la compilazione dei sistemi 
Totocalcio 

Cod.5760 pp.128 L.29.000 

Libro con cassetta per C64 


Boris Allan 

La grafica in alta risoluzione non 
è più un mistero: questo testo 
infatti attraverso la spiegazione 
dì una sene di routine, dà la 
possibilità di apprendere tecni¬ 
che di programmazione grafica 
Cod.573D pp.152 L. 15.000 


Art Margolis 

Illustra in modo semplice ed 
accessibile a tutti le tecniche per 
la ricerca dei guasti, dando la 
possibilità di risolvere almeno la 
metà dei problemi che si presen 
tano sul Commodore 64. 
Cod.CC564 pp.496 L.55.000 


■gr.v^ < 




































PRO DESIGN 



A RADIO DEEJAY 

in palio ogni giorno un'autoradio Alpine con RDS 



AUTORADIO ALPINE mod. 7385R con RDS 
(Radio Data System) • T. Info (Informazioni 
traffico) • A.P.l. (identificazione Automati¬ 
ca del Programma • Sintonizzatore 
ETR/PLL T-10 il (FM, OM, OL) • Controlli se¬ 
parati NF dei toni bassi & alti • Pre-Amp Fa- 
der • Plancia estraibile • 24 stazioni me- 
morizzabili • Dolby B&C • Testina hltac • 
Meccanica GZ • Autometal. 


Per vincerla basta un adesivo: quello di Radio Deejay. 

Radio Deejay l’ascolti in tutta Italia. Cerca la frequenza della tua città o telefona 
allo (02) 342.522-311.326. Sintonizzati e partecipa anche tu a targato DEEJAY. 



SI’KR 


SPIR via De Meandri li, 20144 Mlano 
IH. 02 49,81.841-2-1-4-5 Fa» 02 480 08 191 


RADIO DEIIAY THI MHVORK 
Carila P.Klak- 114 Milano. IH 02 142.522-J11 J2b 


LÀ RADIO ma! 














































